[Moscow.pm] модуль для укрытия всего текста в параграфы

[Alexander Lourier]

On Thursday 09 April 2009 12:29:33 Dmitry Arsentiev wrote:

> В последней строке опечатка
> вместо
> $html = $html . '<p>' unless $html =~ /<\/p>\s*$/si;
> должно быть
> $html = $html . '</p>' unless $html =~ /<\/p>\s*$/si;

Ну да, спасибо.

> 9 апреля 2009 г. 9:09 пользователь Alexander Lourier <aml на rulezz.ru> написал:
> > On Wednesday 08 April 2009 22:12:02 Dmitry Arsentiev wrote:
> >> А вот не знает ли кто-нибудь модуля для того, чтобы текст,
> >> криво (невалидно) размеченный тегами <p> и </p>,
> >> обвернуть в эти теги правильным образом?
> >
> > Навскидку:
> >
> > $html =~ s/(?:<\/?p>\s*)+/<\/p><p>/gsi;
> > $html =~ s/^\s*<\/p>//si;
> > $html =~ s/<p>\s*$//si;
> > $html = '<p>' . $html unless $html =~ /^\s*<p>/si;
> > $html = $html . '<p>' unless $html =~ /<\/p>\s*$/si;