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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> YYYY-MM-DD перевернуть 
V
    Опции темы
evya
Дата 16.7.2012, 16:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



SSS

Это сообщение отредактировал(а) evya - 16.7.2012, 16:09
PM MAIL   Вверх
vadiml
Дата 18.7.2012, 09:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



my $date = '2001-02-03';

if ( $date =~ /^(\d+)-(\d+)-(\d+)/$ ) {
 $date = $3.'-'.$2.'-'.$1;
}

PM MAIL Jabber   Вверх
evya
Дата 18.7.2012, 12:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



спасибо
PM MAIL   Вверх
olexdj
Дата 12.3.2013, 05:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Код

my $date = '2001-02-03';
$date =~ s/^(\d+)-(\d+)-(\d+)$/$3-$2-$1/;


Это сообщение отредактировал(а) olexdj - 12.3.2013, 05:08
PM MAIL   Вверх
Google
  Дата 21.10.2019, 23:05 (ссылка)  





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


 




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


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

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