The problem is the return statement in the while in the subroutine permute_bases. If you return here, the file is not closed and hence buffers are not flushed. If you then open the file and read from it, there is no garantee that what you wrote is already there. (Also note that the open in the subroutine has an unchecked return value - if the open fails, nothing would be written to the file either, but that's probably not the case).

If you would use an autovivified filehandle, using a lexical scalar, then the file would be closed if you perform the return - the filehandle goes out of scope, closing the file.

-- Abigail


In reply to Re: Program can not read the contents of a small file that it has recently written! by Abigail
in thread Program can not read the contents of a small file that it has recently written! by lostcause

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.