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,$sec);? 得到形如：2010-8-30 21:00:00 格式的时间。? 另外，还可以通过Perl的Date模块来取得格式化的时间。? 详细出处参考：http://www.aspzz.cn/article/33944.htm