|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Eugene Grosbein 2:5006/1 11 Mar 2007 21:05:35 To : Vladimir Lomov Subject : Re: Поиск и замена с русскими буквами --------------------------------------------------------------------------------
11 мар 2007, воскресенье, в 15:38 KRAST, Vladimir Lomov написал(а):
EG>> Делай так:
EG>> perl -p -i.bak -e 'use locale; s/\b\s+\b/ /g' file1 file2 file3 ...
EG>> И почитай man perlrun, там это разбирается с примерами.
VL> Спасибо за ответ, особенно за ком. строку и \b. Hо
VL> такой вариант с треском провалиться на запятой,
VL> точке с запятой и пр. пунктупции, например в стиле
VL> LaTeX'а: "< или <<.
Я знаю. Специально не стал об этом говорить, думал если тебе
оно надо, сделаешь так:
perl -p -i.bak -e 'use locale; s/\b\s+\b/ /g; s/([,.<!?-])\s+/$1/g'
Обработать особые случаи нет никакой проблемы.
Главное, выкинь свое [А-Я] - работать оно не будет.
Используй \b.
Eugene
--
Смерть не разбирается, что сделано и что не сделано. (Артха)
Пожалуста... сделайте так чтобы я неразучился читать и писать. (Чарли Гордон)
--- slrn/0.9.8.0 (FreeBSD)
* Origin: Svyaz Service JSC (2:5006/1@fidonet)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/26093b66e3557.html, оценка из 5, голосов 10
|