I've run overlay through B::Deparse... And learned nothing (okay I learned that B::Deparse doesn't run clean with -w, and that the code it produces (at least in this case) is invalid ;-).

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