ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Andrew Alakozow                      2:5061/6       10 Dec 2003  15:49:27
 To : Alex Welens
 Subject : Re: regex
 -------------------------------------------------------------------------------- 
 

 AW> требуется одним оператором s/// заменить все & внутри <![CDATA[
 AW> ]]> на &
 
 Hапример:
 
 s/(  (\Q<![CDATA[\E (?{ $cdata++ }))
    | (&)
    | (\Q]]>\E       (?{ $cdata-- }))
   )
 / $cdata && $3 ? '&' : $1/gxe;
 
 Hо это изврат, читается отвратительно. Я бы распарсил XML, прошелся по всем
 секциям CDATA и сделал замену.
 
 aa29
 --- Microsoft Outlook Express 6.00.2720.3000
  * Origin: Life In The Dark (2:5061/6)
 
 

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