ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Yury Shvetsov                        2:5020/400     21 Apr 2003  14:28:15
 To : Orlovsky Alexander
 Subject : Re: regular expression
 -------------------------------------------------------------------------------- 
 

 "Orlovsky Alexander" <dynamite@alldynamo.ru> wrote in message
 news:1050687592.550128@tst.severodvinsk.ru...
 
 > > $html = "<option value='1' class='red'>first";
 > > для случая, когда $value='';
 > > ?
 > > Кавычки вокруг '1' могут быть, а могут и не быть,
 > > равно как и текст между '1' и '>'.
 >
 > $html =~ s{<[^>]*(value=(:?$value|'$value'))[^>]*>}
 >                  {\1 selected>};
 >
 > ой чуйствую что-то не так написал ;)
 
 Ага.
 Если $value='', и в тексте оно без кавычек, то замена
 сработает, а это нехорошо.
 
 > а думать сейчас тяжело и лениво ;)
 
 Мне думать не лень, но, по-моему, я чего-то не знаю, или знаю,
 но не соображу, как применить. Хелп!
 
 Юрий Швецов.
 --- ifmail v.2.15dev5
  * Origin: Demos online service (2:5020/400)
 
 

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