当前位置:  开发笔记 > 编程语言 > 正文

Perl - 日期计算

如何解决《Perl-日期计算》经验,为你挑选了1个好方法。

我是Perl的新手.我想在输入后计算天数(例如5天).

我需要涵盖的步骤:
1.start_date:08.12.2015
2.添加5天
3.结束日期:?

我的想法是将开始日期转换为时间戳.然后我加5*84.400秒.之后,我想重新转换结束时间戳.

我阅读了Time::Local模块文档,但我还没有理解逻辑.

这是处理日期计算的正确方法吗?



1> Misa Lazovic..:

你可以用DateTime和做DateTime::Format::Strptime.像这样:

use strict;
use DateTime;
use DateTime::Format::Strptime;

my $strp = DateTime::Format::Strptime->new(
    pattern => '%d.%m.%Y'
);

my $date = '08.12.2015';
my $dt = $strp->parse_datetime($date);
printf "%s -> %s\n", $date, $dt->add(days => 5)->strftime("%d.%m.%Y");

推荐阅读
我我檬檬我我186
这个屌丝很懒,什么也没留下!
DevBox开发工具箱 | 专业的在线开发工具网站    京公网安备 11010802040832号  |  京ICP备19059560号-6
Copyright © 1998 - 2020 DevBox.CN. All Rights Reserved devBox.cn 开发工具箱 版权所有