++! The power of aliases, but it never occured to me do that, just changed Triple syntax getopt to use it, Thanks!

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