> EG> if($a=~/\w+/) { print "Yes!\n"; }
> EG> else { print "No!\n"; }
>
> EG> #конец.
>
> EG> Причем неважно, под mod_perl или под чистым perl.
> EG> Почему?
>
> Было такое. Вылечилось какими-то плясками с бубном. FreeBSD?
> Попробуй проверять, что возвращает setlocale.
А возвращало оно undef :-)
Проблема была в имени локали.
Теперь все работает.
=============================================================================
= Apache-Talk@lists.lexa.ru mailing list =
Mail "unsubscribe apache-talk" to majordomo@lists.lexa.ru if you want to quit.
= Archive avaliable at http://www.lexa.ru/apache-talk =