using a mix of all the above Date::Calc, and Time::Local should enable you to knock something together very simply and quickly. All are available for download from the CPAN