Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot

Re: SSI PERL wisdom needed

by larryl (Scribe)
on Mar 11, 2001 at 04:54 UTC ( #63555=note: print w/replies, xml ) Need Help??

in reply to SSI PERL wisdom needed

You might want to take a look at File::CounterFile by Gisle Aas which keeps file-based counters like yours. It uses file locking to handle multiple processes trying to modify the file at the same time, which will be an issue for you because you could have multiple simultaneous HTTP requests going on.

It's very easy to use. This will open the file, increment the value, and return you the updated value:

use File::CounterFile; $c = new File::CounterFile $data_file, $initial_value; $raw_data = $c->inc;

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://63555]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (5)
As of 2018-06-24 08:05 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (126 votes). Check out past polls.