從perl中給定日期計算下一個日期

Question

如何計算perl中給定日期的下一個日期。

Ex。如果給定日期是2010-12-31然後 它應該返回2011-01-01/

在此先感謝。

Answer 1

my $format = DateTime::Format::Strptime->new(
    pattern => '%Y-%m-%d', 
    on_error => 'croak', 
); 

my $dt = $format->parse_datetime('2010-12-31'); 
$dt->add(days => 1); 
say $format->format_datetime($dt); 

Answer 2

日期:: Calc中有這樣一個例行加上許多日期計算例程

您想要使用日期Add_Delta_Days功能

::計算器