0 Пользователей и 1 Гость просматривают эту тему.
Как с этим можно бороться?
use Text::Wrap
Или по простому
$text="http://my_domen.com/my_domen.com/my_domen.com/my_dome"; if (length($text)>$preform){&format_text}
$text=~s/(\\S{30})/$1 /g;все что длинее 30 символов порубитдругое дело, что могут быть проблемы со ссылками..
Убираем проблемы со ссылками: s|([^ \\/\\\\]{30})|$1 |g;
Но это одним regexpом не сделать.
Но это одним regexpом не сделать. Можно сделать, но сразу говорю, что писать его не буду.