Как в функцию передать массив и что то с ним сделать в perl?
Ответ
Можно передавать указатель на массив:
#!perl.exe -w
use strict;
use utf8;
our @array = qw(Мама мыла Вишну);
sub printArray{
my ($ref) = @_;
for my $element (@$ref) {
print "$element
";
}
}
printArray(\@array);
См. perldoc perlref
Комментариев нет:
Отправить комментарий