in reply to multiple columns print

You could also use Terminfo and write :-D, I'm sure Curses has widgets for this as well.

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

In Section Seekers of Perl Wisdom