如何使用Perl获取ISO格式的当前日期？
如何使用Perl获取ISO格式的当前日期？
提问于 2010-10-07 01:40:08
使用Perl获取ISO格式的当前日期(例如"2010-10-06")最有效的方法是什么？
回答 4
Stack Overflow用户
回答已采纳
发布于 2010-10-07 01:46:02
对你来说最有效还是对电脑最有效？
对你来说：
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];Stack Overflow用户
发布于 2010-10-07 05:46:15
或者，您可以使用DateTime模块，它现在似乎是事实上的标准日期处理模块。需要从CPAN安装它。
use DateTime;
my $now = DateTime->now->ymd;Stack Overflow用户
发布于 2010-10-07 03:14:33
您可以使用Time::Piece模块(与Perl5.10及更高版本捆绑在一起，也可以从CPAN下载)，如下所示：
use strict;
use warnings;
use Time::Piece;
my $today = localtime->ymd(); # Local time zone
my $todayUtc = gmtime->ymd(); # UTC页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/3875350
复制相关文章
相似问题