Perl 教程 之 Perl 时间日期 2

Perl 时间日期

Perl中处理时间的函数有如下几种：

1、time() 函数：返回从1970年1月1日起累计的秒数
2、localtime() 函数：获取本地时区时间
3、gmtime() 函数： 获取格林威治时间
当前时间和日期
接下来让我们看下 localtime() 函数，该函数在没有参数的情况下返回当前的时间和日期。

以下 9 个符号代表不同的时间日期参数：

sec, # 秒， 0 到 61
min, # 分钟， 0 到 59
hour, # 小时， 0 到 24
mday, # 天， 1 到 31
mon, # 月， 0 到 11
year, # 年，从 1900 开始
wday, # 星期几，0-6,0表示周日
yday, # 一年中的第几天,0-364,365
isdst # 如果夏令时有效，则为真

实例演示如下：

实例

!/usr/bin/perl

@months = qw( 一月 二月 三月 四月 五月 六月 七月 八月 九月 十月 十一月 十二月 );
@days = qw(星期天 星期一 星期二 星期三 星期四 星期五 星期六);

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();
print "$mday $months[$mon] $days[$wday]\n";

以上实例执行输出结果为：

12 六月 星期天

如果直接调用 localtime() ，它返回系统当期设置时区的时间，实例如下：

实例

!/usr/bin/perl

$datestring = localtime();
print "时间日期为：$datestring\n";

以上实例执行输出结果为：

时间日期为：Sun Jun 12 11:27:31 2016