in reply to Parsing each file of a directory to change once string instance to another

{local($^I,@ARGV)=('.bak',@list);
  while( <> ){
    s%foo\-fuu\.net%fuuonline\.com%ig;
    print;
  }
}

[download]
  • Comment on Re: Parsing each file of a directory to change once string instance to another
  • Download Code

In Section Seekers of Perl Wisdom