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