преобразовать текстовый документ

[andrey_p]

Пожалуйста. Читает из файла или стандартного ввода. Выводим на стандартный вывод. Используем, допустим, так:

Код: [Выделить]

$ ./script.pl 100 in.txt >out.txt
Предварительно:

Код: [Выделить]

$ sudo apt-get install libtext-autoformat-perl
$ chmod +x script.pl

Собственно скрипт:

Код: [Выделить]

#!/usr/bin/perl -w

# usage: perl WIDTH [FILENAME]

use Text::Autoformat;

my $width = shift;

undef $/;
my $text = <>;

$text = autoformat {all => 1, right => $width}, $text;

for (split /\n/, $text) {
    printf "%-${width}s#\n", $_;
}
Только вот про абзацы опять немного не понял. Этот скрипт, если длина строки шире заданной в командной строке WIDTH, будет разбивать ее на несколько.

Задача то простая, но нужна нормальная "спецификация". Я же просил пример входного текста. Как выглядят абзацы, чтоб их считать в строку? Что делать, если длина строки получится шире WIDTH? В каком формате нужен выход - если в текстовом, причем тут моноширный шрифт?

[oleksandr1]

Спасибо за быстрые ответы, а можно в личку напишу? Через аську например?
Пользователь решил продолжить мысль 15 Мая 2011, 21:32:21:Формат выхода - текстовый, абзацы - текст заключенный в теги <p>Текст</p>
Пример входного текста (текстовый формат doc.txt):

<p>Только вот про абзацы опять немного не понял. Этот скрипт, если длина строки шире заданной в командной строке WIDTH,
будет разбивать ее на несколько.</p>

<p>Задача то простая, но нужна нормальная "спецификация". Я же просил пример входного текста. Как выглядят абзацы, чтоб их считать в строку? Что делать, если длина строки получится шире WIDTH? В каком формате нужен выход - если в текстовом, причем тут моноширный шрифт?</p>


Выход:
<p>
Только вот про абзацы опять немного не понял.      #<br>
Этот скрипт, если длина строки шире заданной в     #<br>
командной строке WIDTH, будет разбивать ее на     #<br>
несколько.                                                              #<br>
</p>
<p>
Задача то простая, но нужна нормальная                #<br>
"спецификация". Я же просил пример входного        #<br>
текста. Как выглядят абзацы, чтоб их считать в       #<br>
строку? Что делать, если длина строки получится    #<br>
шире WIDTH? В каком формате нужен выход - если #<br>
в текстовом, причем тут моноширный шрифт?         #<br>
</p>
  
Вроде так выглядят входной текст и выход.