27.10.2009, 07:58
|
|
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
С нами:
10021597
Репутация:
905
|
|
Сообщение от GenTao
PHP код:
my @fuck = (1..10);
my @s = (18,19);
sub shit {
my(@x,@y) = @_;
print @x."\r\n";
print @y."\r\n";
}
shit(@fuck,@s);
system("PAUSE");
Выводит 12,0  .Хотел вывести значения обоих массивов...
Код:
#!/usr/bin/perl
use strict;
use warnings;
$\ = "\n";
my @fuck = (1..10);
my @s = (18,19);
sub shit {
my ($x, $y) = @_;
print join ', ', @$x;
print join ', ', @$y;
}
shit (\@fuck, \@s);
|
|
|