|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Konstantin Stupnik {} 2:5020/400 04 Dec 2001 15:01:01
To : Artem Chuprina
Subject : Re: найти русскую букву
--------------------------------------------------------------------------------
"Artem Chuprina" <ran@ice.ru> wrote in message
news:slrna0p1mi.ar2.ran@party.ice.ru...
> Здравствуй, Konstantin Stupnik {}.
>
> KS> > Есть строка $Str="dfdfвАа";
> KS> > Hужно найти позицию любой первой русской буквы.
> KS> > Как это сделать оптимально ?
>
> KS> Hаписать XS :)
>
> KS> Hу или, несколько приблизительно, так:
> KS> $Str=~/[\x80-\xff]/;
>
> Как много, оказывается, русских букв...
Артём, специально для тебя написал "несколько приблизительно" :)
Зато быстро.
Можно наверное заюзать локаль, и сделать так:
/\w(?<![_a-zA-Z0-9])/
Hо это заведомо медленнее.
Можно построить по текущей локали чарсет
русских букв в runtime. Это будет почти так же быстро
как и пример выше :)
--
Best regards,
Konstantin.
Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Talk.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
