Using Tie::File this way will still need to read and write the whole file. This is much slower than simply reading to the end to get the last line.

It also doesn't scale well for largish files, and doesn't address the concurrency issue.