in reply to how to substitute a word in a file by perl
I will provide code upon receipt of (currency only) USD100.00.
If you really don't want to learn, please stop posting "gimme'" nodes.