|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Vladimir Lomov 2:5020/400 12 Mar 2007 04:12:22
To : Dmitry E. Oboukhov
Subject : Re: Поиск и замена с русскими буквами
--------------------------------------------------------------------------------
Dmitry E. Oboukhov пишет:
VL>>
s/([-,\.!\?"'>]|[a-zA-Z])[[:space:]]{2,}([-,\.!\?"'<]|[a-zA-Z])/$1
VL>> $2/go;
VL>>
s/([-,\.!\?"'>]|[а-яА-Я])[[:space:]]{2,}([-,\.!\?"'<]|[а-яА-Я])/$1
VL>> $2/go;
DE> а что бы просто не сжать вот так:
DE> s/\s+/ /g
DE> ?
Просто мне не нужно сжимать _абсолютно все
пробелы_, а только те, которое разделяют слова, и
находятся между словами или предложениями.
Hапример, (допустим, что это текст из библиотеки
Машкова):
Ветер мглою небо кроет ...
Пять пробелов начинают абзац (что с ним делать,
это другая проблема, я о ней не упоминал :-)),
между словами лишние пробелы, чтобы текст имел
заданную ширину (переносов нет).
Если бы мне нужно было "скормить" это LaTeX'у, то
проблем нет; но вот любой "современный и удобный в
использовании тексовой процессор", просто
раздражаюсе глуп, т.к. ничего не делает с
несколькими подряд идущими пробелами (получается
уродство).
Думаю что проблема почти решена.
Спасибо за советы и вопросы.
- ---
Best regards, Vladimir Lomov
--
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5.3
* Origin: Talk.ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
