[linux] OT: flock v perli mi asi nefunguje

lubos klokner lubos na klokner.sk
Středa Červenec 3 08:55:29 CEST 2002


* Rasto Fuko <fuko135 na pobox.sk> (02.07.2002):
> Ahojte mam taky jednoduchy programcek, ktory by mal locknut subor
> test.dat
> ---------------------
> #!/usr/bin/perl -U
> 
> $LOCK_EXCLUSIVE = 2;
> $UNLOCK		= 8;
> 
> open (FILE, ">> test.dat") || die "problem opening test.dat\n";
> flock FILE, $LOCK_EXCLUSIVE || die "problem locking test.dat\n";
> sleep 20;
> print FILE "test\n";
> flock FILE, $UNLOCK;
> close(FILE);
> ---------------------
> ako mozem zistit ci sa ten subor naozaj lockne? poces behu skriptu
> mozem zapisovat aj mazat test.dat, funguje to spravne?

flock() nieje "zavazne zamykanie".

-- 
lubos klokner <lubos na klokner.sk>





Další informace o konferenci linux