Re: Pattern not manipulating file output

in reply to Pattern not manipulating file output

Several issues:

open OUT "<$out" : opens the OUT handle for INPUT! You probably want ">"
The regex modifying $out is AFTER the 'open'. Should be before
In the regex, why do you have parens? How about $out=~s/\.\w+$/.out/
Replace $out =~ s/fred/larry/gi; with $_ =~ s/fred/larry/gi;

"As you get older three things happen. The first is your memory goes, and I can't remember the other two... " - Sir Norman Wisdom

Comment on Re: Pattern not manipulating file output

In Section Seekers of Perl Wisdom