Рассчитать следующую дату с определенной даты в 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

Date :: Calc имеет процедуру для делать это плюс еще многие даты расчета процедуры

вы хотите использовать функцию Add_Delta_Days из Date :: Calc