|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Andrew Maltsev 2:5015/124 08 Aug 2000 11:10:56
To : All
Subject : Как определить залочен или нет?
--------------------------------------------------------------------------------
$unix = 'yes';
sub LOCK_SH { 1 } # Для чтения
sub LOCK_EX { 2 } # Для записи
sub LOCK_UN { 8 } # Unlock File
sub filelock
{
return flock($_[0],$_[1]) if ($unix eq 'yes');
1;
}
open DATA,">desc.dat";
&filelock(*DATA, LOCK_EX) || die($!); # фыя чтхэшя - LOCK_SH
Господа, если я вот так лочу файл, то как в другом сеансе определить залочен
этот файл уже или нет и дождаться когда он будет разлочен?
____________________________________________________________
http://www.aqua.nnov.ru - Рейтингующий каталог AQUA TOP100!
... info@aqua.nnov.ru
--- GoldED/386 3.00.Alpha5+
* Origin: Я тебя поцелую... Потом... Если захочешь... (2:5015/124)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
