$ perl -e '@a =(1..20);for(sort @a){print "$_ "}'
1 10 11 12 13 14 15 16 17 18 19 2 20 3 4 5 6 7 8 9