Select Code to Download

die "No sort made: $@"
    if ! $sf;

make_sorter: Unknown option or key 'code'

#!/usr/bin/perl
# foo.pl - This is just a test
...

my @order = sort_len( $foo, $bar );
print @order;