ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Ruslan Sulemanov                     2:4635/99.27   25 Nov 2001  14:02:17
 To : All
 Subject : flock
 -------------------------------------------------------------------------------- 
 

                              Hello, All!
 
  Ребята подскажите плиз, что мне делать, как мне быть:
 есть фyнкция flock которая y меня не работает, наверно
 из-за ОС или версии перла под виндy ActiveP 5.6.1.
 Читал, что flock можно заменить на Lock::File, а как
 его реализовать yвы незнаю ? Может кто сталкивался с
 такой проблемой ?
 
         open(DATA,"$database")||
         print "<FONT color=\"#00ff00\">Cannot open database</FONT>\n";
         flock(DATA,$LOCK_EX);### и как её заменить ????
         $findcount=0;
         while(!eof(DATA)){
                 chomp($wwwurl=<DATA>);
                 chomp($comment=<DATA>);
                 chomp($keywords=<DATA>);
                 if($keywords=~/$keyword/){
                         $findcount++;
                         push(@UrlFound,$wwwurl);
                         $UrlComment{$wwwurl}=$comment;
 
                         }
                 }
         flock(DATA,$LOCK_UN); ####  ????????
         close(DATA);
 
     Спасибо!
                                                                 Ruslan
 --- --- --- --- --- --- --- --- --- --- --- --- --- --- --- --- --- --- --- ---
  * Origin: admiraljava@yahoo.com CGI,PERL,JAVA- work! (2:4635/99.27)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    flock   Ruslan Sulemanov   25 Nov 2001 14:02:17   Re: flock   Nikolay Pichtin   28 Nov 2001 11:11:11