For just one hour, Date::Calc is probably overkill. Presuming you have it as epoch seconds just add 3600 and be done with it. However if this is just an example and your needs are more generic then yes look at that or something like DateTime.