The OpenNET Project / Index page

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

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


<< Предыдущая ИНДЕКС Поиск в статьях src Установить закладку Перейти на закладку Следующая >>
Ключевые слова: perl, locale,  (найти похожие документы)
Date: Thu, 25 Oct 2001 08:05:09 +0000 (UTC) From: Pavel Ammosov <[email protected]> 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: [email protected], icq uin: 19210183 www: http://isabase.philol.msu.ru/~apavel/

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

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




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

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