ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/400     12 Aug 2002  12:32:11
 To : Alexey Antonenko
 Subject : Re: получить текст
 -------------------------------------------------------------------------------- 
 

 Здравствуй, Alexey Antonenko.
 
 AA> Как поживаете, All ?
 
 AA>  Есть некоторый текст. В нем может находится одно предложение, например,
 AA> "а111 аа".  Если такое предложение существует, то через фиксированное число 
 AA> симолов в кавычках (") находится некий текст. Как его получить через
 AA> регулярные выражения и будет ли это быстрее, чем то что я делаю сейчас.
 AA>   $tm=index($warriorinfo,"a111  aa",);
 AA>   if ($tm!=-1) {
 AA>    $s=substr($warriorinfo,$tm+50,index($warriorinfo,'"',$tm+51)-$tm-50);
 AA>    print "полученный текст: $s";}
 AA>   else { print "текста нет";}
 
 if ($warriorinfo =~ /a111  aa.{42}("[^"]*")/s) {
   print "полученный текст: $1";
 }
 
 Точные значения и расстановка скобок зависят от того, сколько там именно,
 какова длина оного предложения на самом деле и откуда считается фиксированное
 количество символов - от конца или от начала (если от начала, а длина
 предложения переменная, то регекс будет заметно иным) и нужны ли тебе кавычки
 в результате.
 
 -- 
 Artem Chuprina
 Communiware.net
 RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757
 --- ifmail v.2.15dev5
  * Origin: Leninsky 45 home network (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    Re: получить текст   Artem Chuprina   12 Aug 2002 12:32:11   получить текст   Alexey Antonenko   12 Aug 2002 18:37:04