如何在Perl中将日期转换为所需的格式?

Ani*_*nil 2 perl

我的当前日期为2010年10月1日我需要将其转换为2010年10月1日.是否有任何模块可以转换?

eum*_*iro 16

使用DateTime::Format::Strptime.

use DateTime::Format::Strptime;
my $Strp = DateTime::Format::Strptime->new(
                   pattern     => '%d/%m/%Y',
                   time_zone   => 'UTC',
                  );
my $dt = $Strp->parse_datetime('1/10/2010');
print $dt->strftime('%d %b %Y');
Run Code Online (Sandbox Code Playgroud)

编辑:感谢@davorg提示new.

  • 请不要建议使用间接对象表示法."Datetime :: Format :: Strptime-> new(..)",而不是"new DateTime :: Format :: Strptime(...)".间接符号大部分时间都有效.但如果没有,你会浪费数小时来追查问题. (4认同)