Help for this page

Select Code to Download


  1. or download this
    my $lockfile = $destDir."loadqueue.lck";
open my $fhLock, ">", $lockfile  or die "Failed to open $lockfile: $!"
+;
  2. or download this
    my $lockfile = $destDir."loadqueue.lck";
my $fhLock;
do { eval { open $fhLock, ">", $lockfile  or die "Failed to open $lock
+file: $!" } }
until (defined $fhLock);