Help for this page

Select Code to Download


  1. or download this
    perl -e "print join qq(\n),sort {$a - $b} @ARGV" 33 1 2 99
    1
    ...
    33
    99
    # same result using <=> or -
    
  2. or download this
    perl -e "print join qq(\n),sort {$a - $b} @ARGV" 10000000000 3 2
    10000000000
    2
    3