http://www.perlmonks.org?node_id=126890


in reply to Timed event

Try Date::Manip.pm, with functions (according to `perldoc`) Date_NextWorkDay(), Date_PrevWorkDay(), Date_IsWorkDay(), Date_NearestWorkDay().