|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrey Titov 2:5020/400 16 Apr 2001 15:09:00 To : All Subject : Re: Hижний регистр --------------------------------------------------------------------------------
> >> Если строка написена латинскими буквами, то всё работает
> >> нормально, но если строка написана по-русски, то в нижний
> >> регистр перевести не удаётся. То же происходит и на моей
> >> локальной машине. Этe проблему можно как-нибудь решить?
>
> >> use locale;
> >> use POSIX qw (locale_h);
> >> setlocale(LC_CTYPE, "Russian_Russia.1251");
>
> bmnr> Спасибо, так работает. Hо я уже раньше нашёл другое решение:
> bmnr> $body =~ tr/А-Я/а-я/;
>
> Тоже мне, решение... Хинт: "Ёлка".
Так лучше:
$s =~ tr/\xA8\xC0-\xDF/\xB8\xE0-\xFF/;
Что касается use locale; то на локальной машине работает, а на сервере -
нет.
Hа сервере стоит FreeBSD + Apache.
Перепробовал:
setlocale(LC_CTYPE, 'ru_RU.1251');
setlocale(LC_CTYPE, 'ru_RU.KOI8-R');
setlocale(LC_CTYPE, "Russian_Russia.1251");
В общем надо обращаться к администратору сервера, чтобы он
сказал, как у них настроено. Строка же замены работает всегда.
--- ifmail v.2.15dev5
* Origin: MTU-Intel ISP (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/9104b0d710c4.html, оценка из 5, голосов 10
|