Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> strftime + no locale 
:(
    Опции темы
klem4
Дата 23.3.2010, 22:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 100
Регистрация: 27.7.2008

Репутация: 2
Всего: 2
Как заставить strftime не использовать текущую локаль ? no locale и приведенный ниже вариант не помогают ...

Код

#!/usr/bin/perl
use POSIX qw[ strftime locale_h ];
setlocale(LC_ALL, 'en_US.UTF-8');

    print strftime("%A, %d-%B-%y %H:%M:%S", localtime(time)), "\n";


$ perl test.pl
Вторник, 23-Март-10 23:00:30

локаль консоли ru_RU.UTF-8.

Спасибо.

Это сообщение отредактировал(а) klem4 - 23.3.2010, 23:00
PM MAIL   Вверх
vadiml
Дата 24.3.2010, 00:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 310
Регистрация: 27.7.2007

Репутация: 5
Всего: 7
$ set | grep LANG
LANG=ru_RU.UTF-8
LANGUAGE=

$ perl -MPOSIX -e 'print strftime("%A, %d-%B-%y %H:%M:%S", localtime(time)), "\n"'
Вторник, 23-Март-10 23:35:12

$ LANG=C perl -MPOSIX -e 'print strftime("%A, %d-%B-%y %H:%M:%S", localtime(time)), "\n"'
Tuesday, 23-March-10 23:35:06
PM MAIL Jabber   Вверх
amg
Дата 24.3.2010, 06:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1145
Регистрация: 3.8.2006
Где: Новосибирск

Репутация: 38
Всего: 50
Переменные окружения можно попробовать задать и внутри скрипта:
$ENV{LC_ALL} = 'C';
PM MAIL   Вверх
krypt3r
Дата 24.3.2010, 07:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 359
Регистрация: 9.6.2009

Репутация: 2
Всего: 16
хм, а у меня код ТС-а, выдал ожидаемый результат
Код

Wednesday, 24-March-10 08:59:45

А вот использование %ENV как раз и не повлияло ни на что.

ЗЫ. Локаль, естественно, ru_RU.UTF-8
PM MAIL   Вверх
arto
Дата 24.3.2010, 07:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1495
Регистрация: 31.10.2004

Репутация: 38
Всего: 40
perldoc perllocale, LC_TIME
PM MAIL ICQ   Вверх
klem4
Дата 24.3.2010, 12:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 100
Регистрация: 27.7.2008

Репутация: 2
Всего: 2
Кроме изменение LANG непосредственно в консоли, ничего пока не помогает ... 
PM MAIL   Вверх
arto
Дата 24.3.2010, 13:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1495
Регистрация: 31.10.2004

Репутация: 38
Всего: 40
# LC_ALL=ru_RU.UTF8 perl -MPOSIX=strftime,locale_h -le 'print strftime "%A, %d-%B-%y %H:%M:%S",localtime'
Среда, 24-Март-10 12:10:16
# LC_ALL=ru_RU.UTF8 perl -MPOSIX=strftime,locale_h -le 'setlocale (LC_TIME,"C"); print strftime "%A, %d-%B-%y %H:%M:%S",localtime'
Wednesday, 24-March-10 12:11:7
PM MAIL ICQ   Вверх
klem4
Дата 24.3.2010, 20:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 100
Регистрация: 27.7.2008

Репутация: 2
Всего: 2
Всем спасибо. Модерам просьба поставить arto +1. В итоге правда через реплэйсы сделал функцию, а потом вообще другим путем пошел. Но знание все равно сила smile
PM MAIL   Вверх
JackYF
Дата 24.3.2010, 20:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


полуавантюрист
****


Профиль
Группа: Участник
Сообщений: 5814
Регистрация: 28.8.2004
Где: страна тысячи озё р

Репутация: нет
Всего: 162
Цитата(klem4 @  24.3.2010,  19:07 Найти цитируемый пост)
Модерам просьба поставить arto +1.

Сделано.


--------------------
Пожаловаться на меня как модератора можно здесь.
PM MAIL Jabber   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0474 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.