See also quest for perl mnemonics. I posted mine there because I came across it first when looking for this thread.

--
perl -pe "s/\b;([st])/'\1/mg"