Есть в регулярных выражениях в перле симовл i, который говорит перлу, чтобы тот не обращал внимания на регистр букв... Но с русским это не прокатывает - как нибудь лечится?Например:
==================================
my @test=('CaXcoB','Москва','москва');
my @temp=('caxcob','москва','москва');
for(my $cnt=0; $cnt<scalar(@test); $cnt++){
if($test[$cnt] =~ /$temp[$cnt]/i){print "$cnt ";}
}
==================================
Получается: 0 2
А хочется разумеется 0 1 2 :) Кто подскажет как?
>Есть в регулярных выражениях в перле симовл i, который говорит перлу, чтобы
>тот не обращал внимания на регистр букв... Но с русским это
>не прокатывает - как нибудь лечится?
>
>Например:
>==================================
>my @test=('CaXcoB','Москва','москва');
>my @temp=('caxcob','москва','москва');
>for(my $cnt=0; $cnt<scalar(@test); $cnt++){
> if($test[$cnt] =~ /$temp[$cnt]/i){print "$cnt ";}
>}
>==================================
>Получается: 0 2
>А хочется разумеется 0 1 2 :) Кто подскажет как?
с установвкой локали, видать, у вас проблемы
>с установвкой локали, видать, у вас проблемы
Да не думаю... Всё ведь отображается нормально (Windows1251, KOI8 и др) и на сайте и в консоле...
>>с установвкой локали, видать, у вас проблемы
>Да не думаю... Всё ведь отображается нормально (Windows1251, KOI8 и др) и
>на сайте и в консоле...
Что, и сортировка русская работает?
use locale; # в начало скрипта
О! Точно! Спасибо, теперь работает.