my @sorted = sort keys %hash;

##</code><code>##

foreach my $key (sort keys %hash) {
   # Do something with $hash{key};
}

##</code><code>##

my @sortedkeys = sort { $hash{$a} cmp $hash{$b} } keys %hash;