foreach my $k (keys %{hash}) { #### foreach my $k (keys %{$hash}) {