Lots of ways; the easiest is to use 'time' function (print gmtime( time - 24 * 60 * 60 )). You might also check Date::Manip module -- its ParseDate function allows for specifying time in quite complex ways (like "3 days ago".

use Date::Manip;
print ParseDate( "yesterday" ) . "\n";
[download]

-mk