|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Konstantin Stupnik {} 2:5020/400 05 Dec 2001 11:24:26
To : Andrey Rookin
Subject : Re: найти русскую букву
--------------------------------------------------------------------------------
Hi!
> >> Hу или, несколько приблизительно, так:
> >> $Str=~/[\x80-\xff]/;
> >> my $pos=length($`);
>
> KS> Торможу!
> KS> my $pos=$-[0];
>
> Hу тогда уж:
>
> $Str =~ /[\x80-\xFF]/g;
> $pos = pos($Str);
Гм.
Hу тогда уж
$pos=pos($Str)-1;
:)
Hо не думаю, что $-[0] медленее.
--
Best regards,
Konstantin.
Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Talk.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
