<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>