Используйте strict, и таких задач не станет вообще!
----- Reply message -----
От: "Orlovsky Alexander" <[email protected]>
Кому: "Moscow.pm group" <[email protected]>
Тема: [Moscow.pm] К коллективному разуму...
Дата: пт, апр 27, 2012 16:06
если имена массивов известны, то тоже самое лучше сделать как-то так: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
[email protected] | http://moscow.pm.org--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
