in reply to Hash with sub
It would be more readable to break it up:for my $file_name ( keys %{ $hash_name eq 'dat' ? \%dat_mapping : \%eng_mapping } ) { ... }
my $hash = $hash_name eq 'dat' ? \%dat_mapping : \%eng_mapping; for my $file_name (keys %$hash) { ... }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Hash with sub
by ed_r (Initiate) on Mar 03, 2010 at 13:52 UTC |