foreach (@Array) { code here }

##</code><code>##

foreach (@Array) {
   foreach my $tmp (keys %{$Array[$_]}) { 
      print "$tmp\n" 
   }
}

##</code><code>##

foreach (@Array) {
   foreach my $tmp (keys %$_) { 
      print "$tmp\n" 
   }
}