perl计算之前某个日期到现在一共多少天
答案:1 悬赏:50 手机版
解决时间 2021-01-09 10:02
- 提问者网友：浩歌待明月
- 2021-01-08 09:22
perl计算之前某个日期到现在一共多少天
最佳答案
- 五星知识达人网友：琴狂剑也妄
- 2021-01-08 10:42
use Time::Local;
print elapse(2016, 12,1);
sub elapse {
my ($y, $m, $d) = @_;
my $f = timelocal(0, 0, 0, $d, $m - 1, $y);
return int((time -$f)/86400);
}
print elapse(2016, 12,1);
sub elapse {
my ($y, $m, $d) = @_;
my $f = timelocal(0, 0, 0, $d, $m - 1, $y);
return int((time -$f)/86400);
}
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯