ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Denis Balashov                       2:5010/103.12  09 Apr 2001  19:08:52
 To : All
 Subject : подскажите, плиз, начинающему
 -------------------------------------------------------------------------------- 
 

 
 @farr - массив строк
 
 [.........]
 $f = IO::File->new("<$filename") or die "Cannot open file $filename.";
 while(!$f->eof()) {
   @farr[$i++]=$f->getline();
   chomp(@farr[$i-1]);
 };
 [.........]
 
 Вот такая конструкция замечательно работает:
 if(@farr[$k]=~/(.*)(\s)($server)(\spostfix\/qmgr\[\d+\]:\s)(\w+)/) {...}
 
 т.е. по одной строке он ищет. А вот как сделать поиск по всему массиве?
 
 if(@farr=~/(.*)(\s)($server)(\spostfix\/qmgr\[\d+\]:\s)(\w+)/m) {...}
    ^^^^^ так не работает...
 
 пуковка m в конце не влияет - все равно ничего не находит... и вот не знаю,
 как сделать... подскажите, а?
 
                                                                    Denis.
 ---
  * Origin: Разбираю игрушки на запчасти... (2:5010/103.12)
 
 

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

Тема:    Автор:    Дата:    подскажите, плиз, начинающему   Denis Balashov   09 Apr 2001 19:08:52   Re: подскажите, плиз, начинающему   Artem Chuprina   09 Apr 2001 20:17:56   подскажите, плиз, начинающему   Denis Balashov   10 Apr 2001 09:08:41   Re: подскажите, плиз, начинающему   Artem Chuprina   10 Apr 2001 19:01:42   Re: подскажите, плиз, начинающему   Alexander Babanov   09 Apr 2001 22:07:37   подскажите, плиз, начинающему   Denis Balashov   10 Apr 2001 18:43:47   Re: подскажите, плиз, начинающему   Alexander Babanov   10 Apr 2001 13:05:41