Как на PERL вырезать все HTML тэги из строки

Можно посмотреть на HTML::FormatText - форматмрует HTML как plain text.

Потом можно глянуть HTML::Scrubber - он удаляет только "опасные" тэги, таким образом все же разрешая использовать HTML форматирования.

Ну и конечно - HTML::Parser как универсальное средство :-)

Да, и не надо придумывать свой regular expression...

Если хочешь почитать мегатонны дискуссий на эту тему, добро пожаловать в comp.lang.perl.misc, можно поиском через groups.google.com.

HTH

$text =~ s/<.*?>//gi;

И нет тебе никаких тэгов.

Огромное спасибо :-)

znaya teper' chto takoe TEG ;) - mozhet

s/<[^>]*>//

?

а может лучше так:

s/</&lt;/g
s/>/&gt;/g

вот это наиболее правильно, "вырезать все не закрывающие символы тегов между открывающим и закрывающим". Хотя HTML::Parser в некотором конечно лучше. Но это проще и быстрее.

только яб так сделал:

$txt=s/<[^>]*?>//igs;

>$txt=s/<[^>]*?>//igs;

символ вопроса после звездочки совершенно лишнее и ненужное.