Re: [Moscow.pm] К коллективному разуму...

Fri, 27 Apr 2012 05:07:09 -0700

если имена массивов известны, то тоже самое лучше сделать как-то так:
for my $arr_ref (\@params1, \@params2, \@params3) {
   next unless @$arr_ref;
   
   say Dumper($arr_ref);
}
 
27.04.2012, 15:45, "Sergey Malochinskiy" <[email protected]>:
Уважаемы участники Moscow.pm
Помогите плиз с небольшой задачкой.
Есть несколько  массивов:
Необходимо обратится к ним по имени к каждому.
Проверить наличие элементов и перебрав сделать какое-то действие с каждым элементом.
Пишу:
my @params1 = [11, 12, 13, 14, 15];
my @params2 = [21, 22, 23, 24, 25];
my @params3 = [31, 32, 33, 34, 35];
for ( qw/params1 params2 params3/ ) {
    my @tmp_array = @{ ${$_} };
    if ( @tmp_array ) {
        say Dumper @tmp_array;
    }
}
Можно это как-то сделать? Или направьте как поиск в гугле задать. :)
Спасибо.

--
Best regards,
Sergey Malochinskiy
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
-- 
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить