in reply to merging two hashes
my @a; for my $key(sort keys %$s){ push @a,$_ for @{$s->{$key}->{1}}; }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: merging two hashes
by martin (Friar) on Feb 08, 2006 at 21:39 UTC |
In Section
Seekers of Perl Wisdom
in reply to merging two hashes
my @a; for my $key(sort keys %$s){ push @a,$_ for @{$s->{$key}->{1}}; }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: merging two hashes
by martin (Friar) on Feb 08, 2006 at 21:39 UTC |