|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Yury Kopyl 2:5020/400 06 Feb 2004 11:53:19 To : Serge Chervjakov Subject : Re: Снова трабл: теперь locale. -------------------------------------------------------------------------------- Serge Chervjakov -> "Снова трабл: теперь locale." : SC> Hi All, SC> Hе уверен, что сюда, но ИМХО locale это нечто такое CGI'шное:). SC> Трабл вот в чем: SC> use locale; SC> use POSIX qw(locale_h); SC> setlocale(LC_CTYPE, 'ru_RU.KOI8-R'); SC> print lc('АБВ'); SC> Все конечно догадались, что я хочу увидеть, а что вижу:). Вижу АБВ, SC> хочу абв:). SC> Дык вот, почему? SC> Проверка показала, что если после setlocale(LC_CTYPE, SC> 'ru_RU.KOI8-R'); сделать print setlocale(LC_CTYPE); SC> то увижу я ничто иное как ru_RU.KOI8-R. SC> Так в чем же может быть дело? так попробуй: my $locale = "ru_RU.KOI8-R"; my $new_locale = setlocale(LC_ALL, $locale); croak "Hет локали $locale" if ($new_locale ne $locale); Yury Kopyl aka hrg | http://id.totem.ru | "Если ты плюнешь на коллектив - коллектив утрется, но если коллектив плюнет на тебя - ты утонешь" (С)Баралгин --- ifmail v.2.15dev5.3 * Origin: IAC Samara-Internet, Ltd. (2:5020/400) Вернуться к списку тем, сортированных по:
Архивное /ru.cgi.perl/1027761288e85.html, оценка из 5, голосов 10
|