Although I agree doesn't work is next to useless as an explanation it appears from your code that your presume that opening a file for Read/Write using the "+<" syntax will let you read a line into $_, modify that line using a regex s/this/that/ and then print that line back into the file using print $_. You can't do that using "+<". Each time you read a line you move the file position pointer 1 lines worth of bytes. If you then print to the file (via a print FILEHANDLE $stuff you will write at the current file postion pointer location and thus overwrite the data immediately following the line you just read rather than replace it.

What you want to do is called inplace editing. Perl does this with ease. Do a Super Search for "inplace edit" in the text to find exactly the code I presume you want. Here is one link Re: Read from a file and replace

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print