当前位置:首页 >> 脚本专栏

Perl中处理时间的几个函数

1、time函数:返回从1970年1月1日起累计的秒数
使用:my $t=time();

2、 localtime函数:获取本地时区时间
使用:my $t=localtime(time());

3、gmtime函数: 获取格林威治时间
使用:my $t=gmtime(time());

得到格式化时间(以localtime函数为例):
my($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time());
上式中前三个表示秒、分、时,中间三个是天数、月数(从0开始计数)、年份(相对1990年),最后三个分别是一周第几天(周几) 、一年第几天、夏令时有效标识。

通过sprintf来格式化时间:

my $format_time=sprintf("%d-%d-%d %d:%d:%d",$year+1990,$mon+1,$mday,$hour,$min,$sec);
得到形如:2010-8-30 21:00:00 格式的时间。
另外,还可以通过Perl的Date模块来取得格式化的时间。