Anonymous user
Last Friday of each month: Difference between revisions
→{{header|Perl 6}}: slight twiddle
(→{{header|Perl 6}}: added alternative solution) |
(→{{header|Perl 6}}: slight twiddle) |
||
Line 507:
<lang perl6>sub MAIN (Int $year = Date.today.year) {
say ~.value.reverse.first: *.day-of-week == 5
for
}</lang>
Here, <code>
=={{header|PHP}}==
|