Select Code to Download

$ perl -wle 'map { print } qw(d c a b)'

$ perl -wle 'sort { print "$a<=>$b"; $a cmp $b } qw(e d c a b)'