脚本专栏 
首页 > 脚本专栏 > 浏览文章

perl获取日期与时间的实例代码

(编辑:jimmy 日期: 2024/11/27 浏览:3 次 )

注意: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 push的用法及子程序返回值的反思
下一篇:perl子程序的运用及子程序中变量私有(my)声明的重要性
友情链接:杰晶网络 DDR爱好者之家 南强小屋 黑松山资源网 白云城资源网 网站地图 SiteMap