如何使用Perl获得ISO格式的当前日期?

内容来源于 Stack Overflow,并遵循CC BY-SA 3.0许可协议进行翻译与使用

  • 回答 (2)
  • 关注 (0)
  • 查看 (31)

使用perl获取当前的ISO格式日期(例如“2010-10-06”)最有效的方法是什么?

提问于
用户回答回答于

对你来说:

use POSIX qw/strftime/;

print strftime("%Y-%m-%d", localtime), "\n";

对于计算机:

my @t = localtime;
$t[5] += 1900;
$t[4]++;

printf "%04d-%02d-%02d", @t[5,4,3];
用户回答回答于

或者你也可以使用datetime模块,它似乎是当今事实上的标准数据处理模块。需要从CPAN安装它。

use DateTime;
my $now = DateTime->now->ymd;

扫码关注云+社区