foreach my $key (keys %hashname) {
    .....
}