Select Code to Download

sub make_sort_sub {
    my $coderef = shift;
...
    { $hashref->{$a} <=> $hashref->{$b} },
    \%hash);
my @keys_sorted_by_value = sort $keys_by_value %hash;