Some comments. First of all, I don't know what system you're using, but my Unix hosting account will wait on flock rather than returning an error if another flock is currently running. Second, it's very inconvenient to flock the file you're trying to process. What if you want to open a file, read its contents, close it, open it for writing, write some new or edited data, and close? If you're flocking the primary file, the flock will be gone between the first close and the second open. What you need to do instead is create a temporary file based off the name of the file you're trying to lock, lock that, do whatever processing needs to be done on the primary file, then unlock. This will give you much more flexibility. Thirdly, you shouldn't have your flock routine also be your open routine, and your f(un)lock be your close. Separate the processes so you don't have to change your routines every time you want to do something different to the files you're editing.

As for your code, any hints as to where you think the problem(s) lie?

In reply to Re: Storable and passed filehandles by TedPride
in thread Storable and passed filehandles by blahblah

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.