in reply to Last N lines from file (tail)

Tada! File::ReadBackwards/File::ReadBackwards

--
perl -p -e "s/(?:\w);([st])/'\$1/mg"