Help for this page

Select Code to Download

Select or download this
```
undef $/;
$filecontemts=<DEFILE>
```

Select or download this

print "Changing \"$File::Find::name\" file...\n" if ($happens=($file_c
+ontents =~ s/$changefrom/$changeto/g));