in reply to
What got you interested in Perl?
I had had just been introduced to
Athena (née Project Athena)
and doing lots of cshell scripting (please, I don't
need pointers to "Csh considered harmful"). And I
Zephyr is MIT's
"instant messaging" service that long predates AIM,
ICQ, et al. It's also used at CMU and a few other places.
Anyways, the wrapper chose a random signature from
a flatfile for these messages, and I wanted to add
features that the author was opposed to so I slowly
figured out how to do
it myself ;-).
perl -pe "s/\b;([st])/'\1/mg"