骏马金龙

网名骏马金龙,钟情于IT世界里的各种原理和实现机制,强迫症重症患者。爱研究、爱翻译、爱分享。特借此一亩三分田记录自己成长点滴!!!
我本问道人,道心不坚,必将与道无缘!

Perl的time、localtime和gmtime函数

  • time用于返回当前时间点,但返回结果是以从1970年1月1日(纪元由操作系统决定,但unix系统一般都是1970年1月1日)距离现在的秒数表示的
  • localtime用于返回给定时间的秒、分、时、日、月、周、年等9个部分的时间属性
  • gmtime和localtime类似,但是返回的UTC时间
print time,"\n";

localtime在列表上下文返回的是各个时间部分,在标量上下文返回的是一个本地格式的时间值。

[root@xuexi perlapp]# perl -e '$a=localtime;print $a,"\n";' 
Sat Sep  8 09:03:56 2018

以下是localtime在列表上下文返回的各个时间部分:

#  0    1    2     3     4    5     6     7     8
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);

其中:

  • sec:秒
  • min:分
  • hour:时
  • mday:日,即当月的第几天
  • mon:月份,值为0-11,0表示1月,11表示12月,如此表示的好处后面解释
  • year:年,返回从1900年开始的整数值,如果要返回4位数的年份,将其加上1900即可
  • wday:周几,值为0-6,0是周日,1是周一,6是周六
  • yday:一年的第几天,值为0-364或0-365
  • isdst:是否是夏令时

例如:

use 5.010;

@time=localtime;

say qq(second  : $time[0]);
say qq(minute  : $time[1]);
say qq(hour    : $time[2]);
say qq(mon_day : $time[3]);
say qq(month   : $time[4]);
say qq(year    : $time[5]);
say qq(week_day: $time[6]);
say qq(year_day: $time[7]);
say qq(isdst   : $time[8]);

输出结果为:

second  : 42
minute  : 10
hour    : 9
mon_day : 8
month   : 8
year    : 118
week_day: 6
year_day: 250
isdst   : 0

之所以用0表示1月份,11表示12月份,是为了让月份数值和偏移对应。例如,偏移0位表示1月。

my @month = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
print "$month[$mon]"
posted @ 2018-09-08 23:36  骏马金龙  阅读(...)  评论(...编辑  收藏