[0] Perl> $t = time(); while( $_=localtime( $t ) and m[2008] ) { m[^Mon] and print scalar localtime( $t ); $t+=86400; } Mon Aug 25 18:45:13 2008 Mon Sep 1 18:45:13 2008 Mon Sep 8 18:45:13 2008 Mon Sep 15 18:45:13 2008 Mon Sep 22 18:45:13 2008 Mon Sep 29 18:45:13 2008 Mon Oct 6 18:45:13 2008 Mon Oct 13 18:45:13 2008 Mon Oct 20 18:45:13 2008 Mon Oct 27 17:45:13 2008 Mon Nov 3 17:45:13 2008 Mon Nov 10 17:45:13 2008 Mon Nov 17 17:45:13 2008 Mon Nov 24 17:45:13 2008 Mon Dec 1 17:45:13 2008 Mon Dec 8 17:45:13 2008 Mon Dec 15 17:45:13 2008 Mon Dec 22 17:45:13 2008 Mon Dec 29 17:45:13 2008
In reply to Re: What is the best way to get a list of all Mondays until the end of the year?
by BrowserUk
in thread What is the best way to get a list of all Mondays until the end of the year?
by wenD
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |