foreach my $hash (@a){
    foreach my $key (keys %{$hash}){
        print "key >$key< value>",$hash->{$key},"<\n";
    }

}