|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Yuriy Kaminskiy 2:5020/517.21 05 Jun 2001 16:03:19
To : Alexander Zigar'
Subject : Re: пpовеpка на теги
--------------------------------------------------------------------------------
Hello, Alexander!
>>>>> On 23:41 04/6/2001, Alexander Zigar' <2:5058/56.8> writes:
AZ> Hасyщный, навеpное, вопpос. Есть пеpеменная $text, необходимо
AZ> yдалить любyю инфоpмацию междy '<>', включая их самих. Одним
AZ> regexp'ом можно? Я пока в них не силен :(
AZ> $text=~s/<.*>//g;
AZ> Что не так?
То, что .* жрет _максимальный_ возможный кусок. То есть из
aaa<p>xxx<p>yyy<br>bbb она оставит только aaabbb.
Правильный ответ номер раз: s/<.*?>//g.
Правильный ответ номер два: s/<[^>]*>//g.
--
Yuriy Kaminskiy.
PS Если делать не наколеночное поделие :), то нужно сразу смотреть в
сторону HTML::Parser или HTML::Tree.
Или open(TEXT,"links /path/to/.html|") :)
--- Gnus v5.2.25/XEmacs 19.14
* Origin: none (2:5020/517.21@fidonet)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
