use strict; print sort {$a <=> $b} <> __END__ Usage example: sort.pl data.txt