Исходное сообщение
"Конвертирование текста" Отправлено Ami, 06-Апр-10 17:25
>[оверквотинг удален] >> >>все понятно но как вот в чем вопрос я с перлом не >>особо( >> >>а примером кода не могли бы продемонстрировать >>Спасибо. > >примеры построчного чтения для readlline - см в мануале >chomp - отрезка конца >. - конкатенация набросал примерно open F, "<lolo" or die "Can't open!"; @f=<F>; for($i=0; $i<=$#f; $i++) { $f[$i] =~ s/(.{75})/"$1"\n/g; print "$f[$i]\n"; } close F; но он не отрабатывает если в тексте попадается точка(( как обойти пользовался также use Text::Wrap сним получше ,но он умеет только ставить кавычку вначале а в конце нет(

Ваше сообщение
Имя*:
EMail:	Для отправки новых сообщений в текущей нити на email укажите знак ! перед адресом, например, !user@host.ru (!! - не показывать email). Более тонкая настройка отправки ответов производится в профиле зарегистрированного участника форума.
Заголовок*:
Сообщение*:	>>[оверквотинг удален] >>> >>>все понятно но как вот в чем вопрос я с перлом не >>>особо( >>> >>>а примером кода не могли бы продемонстрировать >>>Спасибо. >> >>примеры построчного чтения для readlline - см в мануале >>chomp - отрезка конца >>. - конкатенация > набросал примерно > open F, "<lolo" or die "Can't open!"; > @f=<F>; > for($i=0; $i<=$#f; $i++) { > $f[$i] =~ s/(.{75})/"$1"\n/g; > print "$f[$i]\n"; > } > close F; > но он не отрабатывает если в тексте попадается точка(( как обойти > пользовался также > use Text::Wrap > сним получше ,но он умеет только ставить кавычку вначале а в конце > нет(
	Введите код, изображенный на картинке: