my $dt = DateTime->today();
my $dow = $dt->day_of_week();
$dt->substract( days => $dow % 7 );