[Moscow.pm] НА: К коллективному разуму...
Denis Evdokimov
evdokimov.denis на gmail.com
Пт Апр 27 05:44:53 PDT 2012
Может лучше так?
my @params1 = ( 11, 12, 13, 14, 15 );
my @params2 = ( 21, 22, 23, 24, 25 );
my @params3 = ( 31, 32, 33, 34, 35 );
my %params = (
params1 => \@params1,
params2 => \@params2,
params3 => \@params3,
);
for (qw/params1 params2 params3/)
{
if ( exists $params{$_} )
{
say Dumper $params{$_};
}
}
Или даже так:
my %params = (
params1 => [ 11, 12, 13, 14, 15 ],
params2 => [ 21, 22, 23, 24, 25 ],
params3 => [ 31, 32, 33, 34, 35 ],
);
for (qw/params1 params2 params3/)
{
if ( exists $params{$_} )
{
say Dumper $params{$_};
}
}
P.S. Можно сделать и в точности то, о чём ты спрашивал, но этого делать не
стоит.
----------- следущая часть -----------
Вложение в формате HTML было извлечено…
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20120427/91e5d345/attachment.html>
Подробная информация о списке рассылки Moscow-pm