ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Konstantin Tokar                     2:5020/400     23 Jun 2003  02:21:43
 To : ‚« ¤Ё¬Ёp ѓpҐЎ­Ґў
 Subject : Re: как бы покомпактнее осуществить сравнение массивов
 -------------------------------------------------------------------------------- 
 

 > Есть массив @content, как узнать, есть ли в массиве @content хоть одно слово
 > из массива @allwords (где каждый элемент массива @allwords одно слово, а
 > массив @content это текст), далее есть массив @content, как из него выдpать
 > всен линки (а также возможно ли выдpать линки, только имеющие в своем составе 
 > слова из @allwords) и сложить их в массив @links, пока пpиходят на ум какието,
 > как мне кажется неpациональные pешения, может map и grep как то тут должны
 > ускоpить? :)
 
 какую-нибудь глупость типа
 
 my $pattern = '(' . join( ')|(', @allwords ) . ')';
 my $text = join '', @content; # может, это уже есть?
 $text =~ /$pattern/;
 
 --- ifmail v.2.15dev5
  * Origin: MTU-Intel ISP (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    как бы покомпактнее осуществить сравнение массивов   ‚« ¤Ё¬Ёp ѓpҐЎ­Ґў   22 Jun 2003 23:07:18   Re: как бы покомпактнее осуществить сравнение массивов   Ivan Frolcov   23 Jun 2003 01:12:34   как бы покомпактнее осуществить сравнение массивов   Alexandr Boydak   23 Jun 2003 15:06:48   Re: как бы покомпактнее осуществить сравнение массивов   Konstantin Tokar   23 Jun 2003 02:21:43