Hi, Im worried that 2 users could pick up the same ID number from a COUNT file when adding articles. The problem is I want each article added to have a unique ID file. I presume I have to first open the COUNT file, get the current number, then re-open the COUNT file in order to write the current number +1 back to it. I feel there's an easier way to do this however as I'm completely stupid. Am I doing the following right? 
#GET CURRENT NUMBER
open(FH, "counter.dat");
 flock(FH, 1);
 $id = <FH>;
close(FH);

#INCREASE COUNT
$id++;

#WRITE NUMBER BACK
open(FH, "+< counter.dat");
 flock(FH, 2);
 seek(FH, 0, 0); truncate(FH, 0);
 print FH $id;
close(FH);

[download]
With the method up above I was worried that the second user could still pick up the same ID file from the first read of the COUNT file before the first user had actually written the updated number back to it. Any ideas?

ThAtH0M

In reply to Flock Updating Counter by Thathom

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.