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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Перевод даты в другой формат, Fri, 11 Apr 2008 09:39:19 +0400 
:(
    Опции темы
AlexanderI
Дата 11.4.2008, 09:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


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

Репутация: 2
Всего: 3



Существуют ли какие-нибудь готовые модули для перевода вот такой даты  Fri, 11 Apr 2008 09:39:19 +0400 в такую 2008-04-11 09:39:19  ?

Это сообщение отредактировал(а) AlexanderI - 11.4.2008, 09:15
--------------------
Магазин детских игрушек  | Авто ВАЗ
PM MAIL   Вверх
GoDleSS
Дата 11.4.2008, 09:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

Репутация: 2
Всего: 2



Куча всего, хотя бы посмотрите на следующий список, там тоже есть:
http://search.cpan.org/search?query=Date&mode=module
--------------------
It's a nice day to die my friend!
PM MAIL WWW ICQ   Вверх
amg
Дата 11.4.2008, 11:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

Репутация: 38
Всего: 50



AlexanderI, если исходный формат даты жестко задан и не нужно, например, сравнивать даты, то использование модуля - избыточно. Проще и быстрее самому написать регулярку:
Код

%M = qw(Jan 01 Feb 02 Mar 03 Apr 04 May 05 Jun 06 Jul 07 Aug 08 Sep 09 Oct 10 Nov 11 Dec 12);
$date = 'Fri, 11 Apr 2008 09:39:19 +0400';
$date =~ s/[A-Z][a-z]{2}, (\d\d?) ([A-Z][a-z]{2}) (\d{4}) (\d\d:\d\d:\d\d)(?: \+\d{4})?/$3-$M{$2}-$1 $4/;
print "$date\n";


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


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »


 




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


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

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