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