Help for this page

Select Code to Download

Select or download this
$lines =~ s/foo/bar/gms;

Select or download this

open(FILE, ">theother.txt")
    or die "Can't open the other file: $!\n";
print FILE $lines;
close FILE;