Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling

one script at a time (race condition)

by david2008 (Scribe)
on Mar 05, 2013 at 16:36 UTC ( #1021866=perlquestion: print w/replies, xml ) Need Help??
david2008 has asked for the wisdom of the Perl Monks concerning the following question:

Hi all,

I have a group of scripts ...
In each of these script i have section which makes a certain reset of the data base and then make a run.
When 2 of these scripts run together i get a messy result.
How can i restrict that just one process runs at a time ?
It would be sufficient for me that when runs and i try to run, that will die.
How can i achieve this ?

Thanks, David

Replies are listed 'Best First'.
Re: one script at a time (race condition)
by roboticus (Chancellor) on Mar 05, 2013 at 17:42 UTC


    I see you already have your problem solved. I wanted to mention, though, that instead of using a file, you could use the database itself. At the start of the run, check whether a lock entry exists in the table. If not, add an entry to the table. Do it in a transaction so you can avoid any race conditions. Then, when the run ends, delete the entry.

    I only mention it because you're already pounding on the database.


    When your only tool is a hammer, all problems look like your thumb.

Re: one script at a time (race condition)
by Anonymous Monk on Mar 05, 2013 at 16:45 UTC
      This solved the issue.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1021866]
Front-paged by Arunbear
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (5)
As of 2018-06-21 22:53 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (120 votes). Check out past polls.