Perl gmtime用法及代码示例

描述

此函数返回与 EXPR 指定的日期和时间相对应的值列表，如果省略 EXPR，则 time 函数返回的日期和时间为标准格林威治标准时间本地化。返回的值如下 -

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime(time);

所有列表元素都是数字，直接来自 C 的 `struct tm'。 $sec、$min 和 $hour 是指定时间的秒、分和小时。 $mday 是月份中的第几天，而 $mon 是月份本身，范围为 0..11，其中 0 表示一月，11 表示十二月。 $year 是自 1900 年以来的年数。也就是说，$year 是 2023 年的 123。$wday 是星期几，0 表示星期日，3 表示星期三。 $yday 是一年中的第几天，范围为 0..364(或闰年为 0..365)。 $isdst 始终为 0 。

用法

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

gmtime EXPR

gmtime

返回值

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

示例

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

#!/usr/bin/perl

@weekday = ("Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat");

$local_time = gmtime();

print "Local time = $local_time\n";
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime(time);
$year = $year + 1900;
print "Formated time = $mday/$mon/$year $hour:$min:$sec $weekday[$wday]\n";

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

Local time = Sun Sep  1 09:06:41 2013
Formated time = 1/8/2013 9:6:41 Sun