Re^2: How do I keep the first key in a sorted hash?

[Not_a_Number]

You can even do away with the intermediate array variable:

my $min = ( sort { $a <=> $b } keys %hash )[ 0 ];