Help for this page

Select Code to Download


  1. or download this
    use warnings;
    use strict;
    ...
        print $ofh $data;
        close $ofh;
    }
    
  2. or download this
    use warnings;
    use strict;
    ...
            s/Marry Had A\nLittle Lamb\nShe Was GOOD\n/CHANGED!!!\n/smg;
        });
    }
    
  3. or download this
    perl -wMstrict -0777 -i -pe 's/Marry Had A\nLittle Lamb\nShe Was GOOD\
    +n/CHANGED!!!\n/smg' Test*_Copy
    
  4. or download this
    use warnings;
    use strict;
    ...
        print $outfh $data;
        $repl->finish;
    }
    
  5. or download this
    use warnings;
    use strict;
    ...
        print $fh $data;
        close $fh;
    }