http://www.perlmonks.org?node_id=528932


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
    That is an obsolete loop, jZed. Rather than: push @a, $_ for @b; I would write: push @a, @b;