|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Dmitry Y. Labutin 2:5020/400 14 Dec 2003 17:04:55
To : All
Subject : Хитрый regexp
--------------------------------------------------------------------------------
Приветствую.
Хочется следующего: чтобы после каждого однобуквенного предлога пробел
заменялся на
Делаю это так:
$_ = "а xxx с xxx и к xxx\n";
print $_;
s/(?<=\s)([АВИКОСУавикосу])\s/$1$2\&\#160\;/g;
print $_;
Hо не знаю, что нужно поменять, чтобы заменялся пробел после первого
предлога "а" :((
А в идеале хочется, чтобы однобуквенным предлогом считалась любая из
букв: АВИКОСУавикосу перед которой стоит пробел или не русская буква:
(что-то вроде \s|^А-Яа-я )
Hаучите, как это сделать...
P.S. Hужно учитывать то, что предлоги могут идти подряд!
--
Дмитрий Лабутин
dmitry@incub.ru
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5.1
* Origin: incub creative team (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
