Program that uses file locking -- UNIX : flock « File « Perl

1. Perl
2. File
3. flock

Program that uses file locking -- UNIX

    

$LOCK_EX = 2;
$LOCK_UN = 8;

open(DB, ">>datafile") || die "Can't open: $!\n";

flock(DB, $LOCK_EX) || die ;        
print DB "asdf:asdf\n";
flock(DB, $LOCK_UN) || die;         

   
    
    
    
  

Related examples in the same category