sorting values by key:

my @keys_by_key = sort { $a <=> $b } keys %hash;
my @values_by_key = @hash{@keys_by_key};
[download]

or in one single sentence:

my @values_by_key = @hash{sort { $a <=> $b } keys %hash};
[download]