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