http://qs321.pair.com?node_id=727461


in reply to Corrector

May i humbly suggest an alternative...

#!/usr/bin/perl -pi s/this/that/; # substitutes this with that s/one/two/; # substitutes one with two

Run with: corrector.pl C:\filestochange

It doesn't have some of the interesting side effects of the original script, but i consider that a good thing.

Updated: there is no "i" in team, but there should have been one on the first line