注意：localtime获取的年份是相对于1900的偏移，需要加上1900，而localtime获取的month范围是0-11，需要加1。
复制代码 代码如下:
#!/usr/bin/perl
my ($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = localtime();
$year += 1900;
$mon++;
my $date = "$year-$mon-$day";
print $date, "\n";
最后
以上就是勤奋奇迹最近收集整理的关于perl获取日期与时间的实例代码的全部内容，更多相关perl获取日期与时间内容请搜索靠谱客的其他文章。
本图文内容来源于网友提供，作为学习参考使用，或来自网络收集整理，版权属于原作者所有。
发表评论 取消回复