Perl localtime用法及代碼示例

描述

此函數在列表上下文中轉換 EXPR 指定的時間，返回一個 nine-element 數組，其中包含為當前本地時區分析的時間。數組的元素是 -

 # 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