Help for this page

Select Code to Download

Select or download this

if ((localtime(time))[6] == 0) {       # Sunday
    print Date::Manip::ParseDate('next Monday');
    print Date::Manip::DateCalc('next Monday','+ 4 business days');
...
    print Date::Manip::ParseDate('last Monday');
    print Date::Manip::DateCalc('last Monday','+ 4 business days');
}