There is a handy module that will help: File::ReadBackwards. Just read as many lines as you want starting at the end of the file. It's a great time-saver when trying to find the last record/line/block/etc. in a really large file.