ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexey Antonenko                     2:452/112.37   11 Aug 2002  19:20:09
 To : All
 Subject : получить текст
 -------------------------------------------------------------------------------- 
 

 
  Есть некоторый текст. В нем может находится одно предложение, например, "а111
 аа".  Если такое предложение существует, то через фиксированное число симолов в 
 кавычках (") находится некий текст. Как его получить через регулярные выражения 
 и будет ли это быстрее, чем то что я делаю сейчас.
   $tm=index($warriorinfo,"a111  aa",);
   if ($tm!=-1) {
    $s=substr($warriorinfo,$tm+50,index($warriorinfo,'"',$tm+51)-$tm-50);
    print "полученный текст: $s";}
   else { print "текста нет";}
 
                 C уважением, Alexey Antonenko.
 --- УТВЕРЖДАЮ. MSG-редактор капитан 2.5 ранга Голд Дедович фор ДОС UNREG
  * Origin: Арбуз - тоже ягода! (2:452/112.37)
 
 

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