|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 03 May 2001 12:19:28
To : Alexey Litvinuke
Subject : Re: Отодрать текст от тэгов
--------------------------------------------------------------------------------
Здравствуй, Alexey Litvinuke.
В твоём письме от Mon, 30 Apr 2001 22:35:08 +0400 написано:
AL>>> Сам таким пользуюсь! У меня CGA! :)
SV>> гм.... а не проще сделать например прочитав строку в переменную $text
SV>> такое:
SV>> open RF, "$filename" || die "can't open";
SV>> while (<RF>) {
SV>> $text=$_;
SV>> $text =~ s/<([a-zA-Z]|\/[a-zA-Z])[^>]*>//g;
SV>> print $text;
SV>> }
SV>> close RF;
AL> согласен. Hу уж, если действительно говорить о более коротком варианте,
AL> строчку "$test=$_ ;" можно опустить и заменять непосредственно в $_ .
AL> Действительно так будет правильней, т.к. если пара для < не будет
AL> найдена, то мой алгоритм зациклится... Однако у меня есть отговорка! :)
AL> Когда я это писал, а это было 2 года назад, об регулярных выражениях я
AL> никакого понятия не имел, так как только начал читать литературу... ;-)
Все-таки зря ты на lynx -dump наехал... Он гораздо корректнее работает и все
равно есть ;-)
--
Artem Chuprina E-mail: ran@ran.pp.ru
Programmer FIDO: 2:5020/371.32
Memonet Ltd. Phone: +7-095-284-1356
--- ifmail v.2.15dev5
* Origin: NTV Internet (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
