my @array = ( \ %hash0, \ %hash1, \ %hash2, \ %hash3 ); #### foreach my $hashref ( @array ) { print "$_\n" for keys %$hashref; }