in reply to Re: find weekdays for a year
in thread find weekdays for a year
1 use strict; 2 use warnings; 3 4 use DateTime::Event::Recurrence; 5 6 7 my $dt1 = new DateTime( year => 2011 ); 8 my $dt2 = new DateTime( year => 2012 ); 9 my $der = DateTime::Event::Recurrence->weekly(days=>4); # + Thursday is #4 10 print $_->ymd, ' ', ,$/ for 11 $der->as_list( start => $dt1, end => $dt2 );
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^3: find weekdays for a year
by Anonymous Monk on Jul 19, 2011 at 13:59 UTC |