I agree with you about Date::Calc but I think Date::Calc 'Add_Delta_Days' may be closer to what the OP is looking for. He has a date and wants to get the date of the following day.

use warnings;
use strict;
use Date::Calc qw/Add_Delta_Days Today_and_Now/;

my $delta = 1;

my ($year, $month, $day) = Today_and_Now;

print "$year $month $day\n";

my @nextdate = Add_Delta_Days($year, $month, $day, $delta);

print "@nextdate\n";
[download]