for my $key (my @temp = keys %my_hash)