Help for this page

Select Code to Download


  1. or download this
    my $dt = DateTime->today();
my $dow = $dt->day_of_week();
$dt->substract( days => $dow % 7 );
  2. or download this
    my $dt = DateTime->today();
my $dow = $dt->day_of_week();
$dt->substract( days => ( $dow + 6 ) % 7 );