The OpenNET Project / Index page

[ новости /+++ | форум | wiki | теги | ]

[Perl] Включение русской locale в скриптах (perl locale)


<< Предыдущая ИНДЕКС Поиск в статьях src Установить закладку Перейти на закладку Следующая >>
Ключевые слова: perl, locale,  (найти похожие документы)
Date: Thu, 25 Oct 2001 08:05:09 +0000 (UTC) From: Pavel Ammosov <apavel@isabase.philol.msu.ru> Newsgroups: fido7.ru.perl Subject: [Perl] Включение русской locale в скриптах SA>Пишу SA>use locale; SA>use POSIX qw(locale_h); SA>setlocale(LC_ALL,"ru_RU.CP-1251"); SA>$s = uc("русский"); SA>print header(), $s; SA>Кодировку файл имеет правильный. SA>Почему не изменяется регистр? На системе может не быть такой локали, проверь то что возвращает setlocale(): #!/usr/bin/perl -w use strict; use locale; use POSIX qw(locale_h); my $locale = "ru_RU.CP-1251"; my $new_locale = setlocale(LC_ALL, $locale); die "Нет локали $locale" if ($new_locale ne $locale); my $s = uc("русский"); print $s; -- Павел Аммосов, email: apavel@aha.ru, icq uin: 19210183 www: http://isabase.philol.msu.ru/~apavel/

<< Предыдущая ИНДЕКС Поиск в статьях src Установить закладку Перейти на закладку Следующая >>

 Добавить комментарий
Имя:
E-Mail:
Заголовок:
Текст:




Спонсоры:
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2021 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру