my @sorted_keys = sort { $a <=> $b } keys(%foo);