Example:
Call1 to crit.pl - running 
Call2 - waiting for lock
Call3 - waiting for lock
.. 

##</code><code>##

crit.pl
flock :LOCK_EX
//Critical section
flock :LOCK_UN