Сделал почти также, только сделал массив массивов, а не хэш массивов.
Спасибо! 27 апреля 2012 г. 16:44 пользователь Denis Evdokimov < [email protected]> написал: > Может лучше так? > 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. Можно сделать и в точности то, о чём ты спрашивал, но этого делать не > стоит. > > -- > Moscow.pm mailing list > [email protected] | http://moscow.pm.org > > -- Best regards, Sergey Malochinskiy
-- Moscow.pm mailing list [email protected] | http://moscow.pm.org
