mph151:

Perhaps the simplest way is to:

1. Open the file
2. Seek to two byes before the end of the file
3. Truncate the file
4. close the file

Note: the first word of each line is the name of the perl function that does the job.

...roboticus