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


in reply to Re: Determing Week Ranges between given date range?
in thread Determing Week Ranges between given date range?

If you want the first day of the week to be something besides Sunday, you can do this:
my $dow1 = 1; # (0-7) ... while ($week_s <= $e) { ($week_e = $week_s->clone())->add( days => ($dow1 + (7 - $week_s->dow()) % 7, ); ...

Cheers,
Matt