foreach my $hash (@a) { foreach my $word (keys %$hash) { my $wordvalue = $hash->{$word}; # ... } }