Yes, ignoring accuracy I could win with $p=22/7; or in some states $p=3; :-D Oh come on, somebody had to say it.

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