Seek the documentation for seek; then you'll know how to seek to the end of a file: seek(FILE, 0, 2) or die "Can't seek: $!\n"; For more helpful advice, seek the FAQ How do I do a tail -f in perl?.