use Date::Simple qw(date);
my $d = date("2007-12-12");
my $yesterday = $d - 1;
print $yesterday;
[download]

And of course it can be done without a module, because the module is written in Perl as well.

If you want to see how it's done, look at the module's source.