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


in reply to Loop through array of hashes

Why not use a function for that?

use strict; use warnings; my %foo = ( one => 1, two => 2 ); my %bar = ( three => 3, four => 4 ); my %baz = ( five => 5, six => 6 ); dump_keys( $_ ) for \%foo, \%bar, \%baz; sub dump_keys { print "$_\n" for keys %{+shift} }

Update: I am using ONE list without the need to wrap it in an array.

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)