use Date::Manip;
   print "One day ago was: ", DateCalc('today', '- 1 day'), "\n";
[download]

A lot of people will carp and moan about it being slower than other date modules, and this is true. However, 99% of the time date calculations do not end up being the bottleneck in a program. For me the flexibility of the module is worth it.

Matt