# delete first N lines perl -i.old -ne 'print unless 1 .. 15' foo.txt