|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 12 Mar 2007 16:36:25
To : Vladimir Lomov
Subject : Re: Поиск и замена с русскими буквами
--------------------------------------------------------------------------------
Vladimir Lomov -> Dmitry E. Oboukhov @ Mon, 12 Mar 2007 00:12:22 +0000 (UTC):
VL> Dmitry E. Oboukhov пишет:
VL>>>
VL> s/([-,\.!\?"'>]|[a-zA-Z])[[:space:]]{2,}([-,\.!\?"'<]|[a-zA-Z])/$1
VL>>> $2/go;
VL>>>
VL> s/([-,\.!\?"'>]|[а-яА-Я])[[:space:]]{2,}([-,\.!\?"'<]|[а-яА-Я])/$1
VL>>> $2/go;
DE>> а что бы просто не сжать вот так:
DE>> s/\s+/ /g
DE>> ?
VL> Просто мне не нужно сжимать _абсолютно все
VL> пробелы_, а только те, которое разделяют слова, и
VL> находятся между словами или предложениями.
VL> Hапример, (допустим, что это текст из библиотеки
VL> Машкова):
VL> Ветер мглою небо кроет ...
VL> Пять пробелов начинают абзац (что с ним делать,
VL> это другая проблема, я о ней не упоминал :-)),
VL> между словами лишние пробелы, чтобы текст имел
VL> заданную ширину (переносов нет).
В такой постановке самое простое - s/(\S) +/\1 /g;
--
Artem Chuprina
RFC2822: <ran{}ran.pp.ru> Jabber: ran@jabber.ran.pp.ru
ожидания по умолчанию приводят к обломам по определению.
http://apraxina.livejournal.com/301026.html
--- ifmail v.2.15dev5.3
* Origin: Leninsky 45 home network (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
