perl获取日期与时间 perl获取日期与时间的实例代码
人气:0想了解perl获取日期与时间的实例代码的相关内容吗,在本文为您仔细讲解perl获取日期与时间的相关知识和一些Code实例,欢迎阅读和指正,我们先划重点:perl,日期,时间,下面大家一起来学习吧。
注意: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";
加载全部内容