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

In reply to Re: update a file by tachyon
in thread update a file by jalebie

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.