perl -pi -e 'last if eof()' file.txt