Форум на Исходниках.RU

вывести 30 слов из текста не считая тегов

Axis — Mon, 02 Jun 2008 11:04:50 +0000

Axis: Имхо тут регэксп не самое правильное решение, а что делать с незакрытыми тэгами? Я бы сам отсчитал 30 слов, по пути поймал в стек все тэги и затем их закрыл.

вывести 30 слов из текста не считая тегов

YuraN — Mon, 02 Jun 2008 05:33:35 +0000

YuraN: @t = split /(?:(<.+?>)|\W+)/,$text,31;
pop @t;
print @t;

вывести 30 слов из текста не считая тегов

pissed^ — Sun, 01 Jun 2008 10:37:09 +0000

pissed^: Подскажите кто знает? Теги тоже выводим.