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


in reply to A Better Way To Get Days Since Monday of Last Week

You might want to try Date::Calc. The Monday_Of_Week() function should help a lot.