ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Roman Karshiev                       2:5020/400     21 Apr 2000  12:45:12
 To : All
 Subject : Вопрос по регэкспам
 -------------------------------------------------------------------------------- 
 

 Есть мультистрока типа
 
 @s=<<XXX;
 11111
 2222222
 33333
 XXX
 
 $s=links($s);
 
 (Кстати, это будет то же самое, что
 open f,"$file";
 @s=<f>;
 close f;
 $s=links($s);
 или нет?)
 
 Hужно все фрагменты типа
 #l
 #i xxxx
 xxxx
 #i yyyy
 yyyy
 #i zzzz
 #/l
 
 Заменить на
 <ul>
 <li><b>xxxx
 xxxx</b>
 <li><b>yyyy
 yyyy</b>
 <li><b>zzzz</b>
 </ul>
 
 Для однострочных #i всё понятно:
 
 s/#l/<ul>\n/g;
 s/#ib (.*)/<li><b>$1</b>\n/g;
 /#\/l\<\/ul>\n/g;
 
 А вот как сделать, чтобы внутри <b>...</b> входил конец строки и все строки
 до следующего # в начале строки?
 Всякие игры с \s ^ и т.п. у меня не выходят...
 
 --
 =KRoN=  ICQ#4886816
 http://kron.nm.ru
 mailto:kron@nm.ru
 --- ifmail v.2.15dev4
  * Origin: Demos online service (2:5020/400)
 
 

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