Perl gmtime 函数
描述
此函数返回与 EXPR 指定的日期和时间相对应的值列表，或者如果省略 EXPR，则返回时间函数返回的日期和时间，本地化为标准格林威治标准时间。 返回的值如下 −
($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
