Perl 本地时间 函数

描述

此函数转换列表上下文中 EXPR 指定的时间，返回一个九元素数组，其中包含针对当前本地时区分析的时间。数组的元素是 -

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

如果省略 EXPR，则使用时间返回的值。

$mday 是月份中的第几天，$mon 是月份本身，范围为 0..11，其中 0 表示一月，11 表示十二月。

$year 是自 1900 年以来的年数，而不仅仅是年份的最后两位数字。也就是说，$year 在 2023 年是 123。获得完整的 4 位数年份的正确方法很简单： $year += 1900;

句法

以下是该函数的简单语法 -

localtime EXPR

返回值

此函数返回以下形式的字符串： Thu Sep 21 14:52:52 2000 在标量上下文中以及各个时间分量值（秒、分钟、小时、月份中的某一天、月份、年份、星期几、一年中的某一天、夏令时）在列表上下文中。

例子

以下是显示其基本用法的示例代码 -

#!/usr/bin/perl -w
use POSIX;

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) =
                                          localtime(time);
$year += 1900;
print "$sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst\n";
$now_string = localtime; 
print "$now_string\n";

$now_string = strftime "%a %b %e %H:%M:%S %Y", localtime;
print "$now_string\n";

执行上述代码时，会产生以下结果 -

19, 58, 14, 1, 8, 2013, 0, 243, 0
Sun Sep  1 14:58:19 2013
Sun Sep  1 14:58:19 2013