|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/371.32 22 Jan 2001 20:08:16 To : Anatol Subject : Re: Помогите с рег вырожением -------------------------------------------------------------------------------- В твоём письме от Mon, 22 Jan 2001 16:32:48 +0300 написано: arr> Привет! arr> Помогите знающие люди с регулярным выражением. arr> Пишу скрипт для работы с HTML - а для этого нужно: arr> 1) выбрать из всего текста - только кусок между тегами <BODY>.....</BODY> arr> 2) потом полученный кусок обработать следующим способом. arr> (текст представлет собой термин описание) arr> Пример: arr> <P>Термин1 - описание 1</P> arr> <P>Термин 2 - описание 2</P> arr> Hужно разделить на arr> c <P> до - (название) arr> с - до </P> (расшифровка) Если файл весь помещается в память, то $content =~ s#.*<BODY>(.*)</BODY>.*#$1#; %description = ($content =~ m#<P>(.*?) - (.*?)</P>#g); Hаписано в предположении (на что намекает постановка задачи), что это не "вообще HTML", и геморроиться с аккуратным определением конца тега в общем случае не надо. -- Artem Chuprina E-mail: ran@ran.pp.ru Programmer FIDO: 2:5020/371.32 Memonet Ltd. Phone: +7-095-284-1356 --- slrn/0.9.6.3-as (Linux) * Origin: AKA с подствольным плюсомётом (2:5020/371.32) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/7376862882536.html, оценка из 5, голосов 10
|