Help for this page

Select Code to Download


  1. or download this
    use Fcntl qw(:flock);
  2. or download this
    flock FH, LOCK_SH or die "Failed acquiring shared lock on $filename: $!";
  3. or download this
    flock FH, LOCK_EX or die "Failed acquiring ex. lock on $filename: $!";