Perl localtime 函数

  • 描述

    localtime 此函数在列表上下文中转换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(在标量上下文中)和各个时间分量值(秒,分钟,小时,月日,月,年,星期几,年月日,列表上下文中的夏令时)。
  • 示例

    以下是显示其基本用法的示例代码-
     
    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";
    
    尝试一下
    执行结果:
    
    41, 50, 1, 30, 9, 2020, 5, 303, 0
    Fri Oct 30 01:50:41 2020
    Fri Oct 30 01:50:41 2020