Используйте strict, и таких задач не станет вообще!<br><br><div id="htc_header" style="">----- Reply message -----<br>От: "Orlovsky Alexander" <nordicdyno@yandex.ru><br>Кому: "Moscow.pm group" <moscow-pm@pm.org><br>Тема: [Moscow.pm] К коллективному разуму...<br>Дата: пт, апр 27, 2012 16:06<br><br></div><br><div>если имена массивов известны, то тоже самое лучше сделать как-то так:</div><div>for my $arr_ref (\@params1, \@params2, \@params3) {</div><div>   next unless @$arr_ref;</div><div>   </div><div>   say Dumper($arr_ref);</div><div>}</div><div> </div><div>27.04.2012, 15:45, "Sergey Malochinskiy" <sergey.malochinskiy@gmail.com>:</div><blockquote type="cite">Уважаемы участники Moscow.pm<div>Помогите плиз с небольшой задачкой.</div><div>Есть несколько  массивов:</div><div>Необходимо обратится к ним по имени к каждому.</div><div>Проверить наличие элементов и перебрав сделать какое-то действие с каждым элементом.</div><div>Пишу:</div><div><div>my @params1 = [11, 12, 13, 14, 15];</div><div>my @params2 = [21, 22, 23, 24, 25];</div><div>my @params3 = [31, 32, 33, 34, 35];</div><div>for ( qw/params1 params2 params3/ ) {</div><div>    my @tmp_array = @{ ${$_} };</div><div>    if ( @tmp_array ) {</div><div>        say Dumper @tmp_array;</div><div>    }</div><div>}</div></div><div>Можно это как-то сделать? Или направьте как поиск в гугле задать. :)</div><div>Спасибо.</div><div><br />-- <br /><div>Best regards,</div>Sergey Malochinskiy</div><span>-- <br />Moscow.pm mailing list<br /><a href="mailto:moscow-pm@pm.org">moscow-pm@pm.org</a> | <a href="http://moscow.pm.org">http://moscow.pm.org</a><br /></span></blockquote>