Question

求个perl脚本 如当前时间为 201110140000.00 希望得到特定秒[如300秒,即5分钟]之后的时间怎么做? 希望结果

求个perl脚本
如当前时间为 201110140000.00
希望得到特定秒[如300秒,即5分钟]之后的时间怎么做?
希望结果是:
201110140005.00
[yyyymmddhhmi.ss]

Answer 1

如果是要取得服务器的时间的话使用localtime(time)可以得到，你可以按照你的需要读取相应的变量的值就可以了，函数格式如下：
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time);
只要读取左边括号中的变量就可以得到相应的时间。
程序参考：
#! /usr/local/bin/perl
$a = localtime(time);
print "$a\n ";

还考虑你的程序运行10秒哦。
但如果你是要读取客户端的时间的话就需要利用输出的javascript代码在客户端执行的时候取得了，因为perl是需要在服务器中执行的所以没有提供这样的函数！

Answer 2

use Time::Local;

Answer 3

安装库
perl -MCPAN -e shell
install Time::Local
install time::Format
#!/usr/bin/perl
use Time::Local;
use Time::Format;

print("now time\t". $time{'yyyymmddhhmm.ss',time}."\n");
print("convert time\t". $time{'yyyymmddhhmm.ss',time+500}. "\n");

Answer 4

use TimeHiRes