perlquestion
toniax
I just want to say thanks to everyone . I am learning alot<br><br>
Hello Everyone
I use this snippet of code for creating a lock file.
Does a better way exist to do this?<br>
Much Thanks in advanced
<code>
$stop = 0;
while ($stop == 0) {
if (-e "the.lock") {
sleep(1);
}
else {
open (FIL,">the.lock");
close FIL;
}
more code
unlink("the.lock");
$stop = 1;
</code>