Ah, I'd had forgotten that little gem existed. I've used
it before. This quote from the page you link says it all:
(Rule of thumb--every time Microsoft use the word "smart,"
be on the lookout for something dumb).
in reply to Re: Stripping funny characters
in thread Stripping funny characters
The code needs serious work, OTOH. It is not only
perl4ish but also full of goofiness like this:
# Eliminate idiot MS-DOS carriage returns from line terminator
$s =~ s/\s+$//;
$s .= "\n";
All in all it isn't too bad, I'd use it as is, myself =)
$you = new YOU;
honk() if $you->love(perl)