Anonymous user
Day of the week: Difference between revisions
→{{header|Perl}}: Restore Perl 6
(Undo revision 87053 by Underscore (Talk)) |
(→{{header|Perl}}: Restore Perl 6) |
||
Line 907:
Output:
<pre>2011 2016 2022 2033 2039 2044 2050 2061 2067 2072 2078 2089 2095 2101 2107 2112 2118</pre>
=={{header|Perl 6}}==
{{works with|Rakudo|2010.07}}
As Perl 5, except <code>DateTime</code> is built-in, so you don't need to download a module of that name:
<lang perl6>say join ' ', grep { Date.new($_, 12, 25).day-of-week == 7 }, 2008 .. 2121;</lang>
=={{header|PHP}}==
| |||