Re^2: [Class Assignment] Regex and Output Files

Thank you, still new here so I was not aware. So I've gone through and made the changes you've suggested. However, nothing happens with my output.txt file once the code is executed.

use strict;
use warnings;

open(my $in, "<", "input.txt")
    or die "Cannot open < input.txt: $!";

open(my $out, ">", "output.txt")
    or die "Cannot open < output.txt: $!";

while(my $line = <$in>) {
    $line =~ s/new/old/i;
    print $out $line;
}
[download]

Comment on Re^2: [Class Assignment] Regex and Output Files Download Code

Replies are listed 'Best First'.
Re^3: [Class Assignment] Regex and Output Files by marinersk (Priest) on Feb 20, 2015 at 16:28 UTC
I used your most recent code with this `input.txt` file: `Out with the old, in with the new. Old stuff is cool. New stuff is also cool. Now to mess with your head: Fortune favors the bold. I knew it.` [download] It produced the following `output.txt` file: `Out with the old, in with the old. Old stuff is cool. old stuff is also cool. Now to mess with your head: Fortune favors the bold. I kold it.` [download] Do you see the problem(s) yet? Hint:It is a useful skill to be able to fabricate good test data.	[reply] [d/l] [select]
Re^4: [Class Assignment] Regex and Output Files by Hayest (Acolyte) on Feb 20, 2015 at 21:36 UTC
I do see the problem, I adjusted my regex to fix this `=~ s/\bnew\b/old/ig;`. I was having problems with the output before, It's working fine now. Thank you for bringing this to my attention!	[reply] [d/l]
Re^5: [Class Assignment] Regex and Output Files by marinersk (Priest) on Feb 21, 2015 at 00:00 UTC
You bet -- and congratulations! Also, thank you for having the courtesy to point out this was a class assignment. I have no doubts your integrity will serve you well in your life.	[reply]
Re^3: [Class Assignment] Regex and Output Files by toolic (Bishop) on Feb 20, 2015 at 15:47 UTC
nothing happens with my output.txt file once the code is executed I don't know what that means. See also: http://sscce.org	[reply]