当前位置 博文首页 > perl获取日期与时间的实例代码

    perl获取日期与时间的实例代码

    作者:admin 时间:2021-02-06 15:20

    注意:localtime获取的年份是相对于1900的偏移,需要加上1900,而localtime获取的month范围是0-11,需要加1。

    复制代码 代码如下:

    #!/usr/bin/perl
    my ($sec,$min,$hour,$day,$mon,$year,$wday,$yday,$isdst) = localtime();   
    $year += 1900;   
    $mon++;
    my $date = "$year-$mon-$day";   
    print $date, "\n";

    js
下一篇:没有了