Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Perl: Регулярные выражения > YYYY-MM-DD перевернуть


Автор: evya 16.7.2012, 16:06
SSS

Автор: vadiml 18.7.2012, 09:11
my $date = '2001-02-03';

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

Автор: evya 18.7.2012, 12:28
спасибо

Автор: olexdj 12.3.2013, 05:04
Код

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

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)