use strict; use warnings; use DateTime; my $dt = DateTime->new(year => '2005', month => '08', day => '24'); $dt->add(days => 10); print $dt->dmy('/'), "\n";