Select Code to Download

    my $dt = DateTime->new(year=>$year, month=>11);
    $dt->add( days=>(4-$dt->dow())%7, weeks=>3 );