Perl Weekly Challenge 137, Task 1
| Run Settings | |
|---|---|
| Language | Raku |
| Language Version | |
| Run Command |
| Snippet Metadata | |
|---|---|
| Owner | seaker |
| Created | 4 years ago |
| Modified | 3 years ago |
| Visibility | Public |
put (1900..2100)
.grep({ Date("$_-12-31").week[1] == 53 })
.rotor(5, :partial)
.map({ $_.join(', ') })
.join(",\n");
| Editor Settings | |
|---|---|
| Theme | |
| Key bindings | |
| Full width | |
| Lines |