diff options
| author | CY Fung <fungcheokyin@gmail.com> | 2022-07-26 07:13:56 +0800 |
|---|---|---|
| committer | CY Fung <fungcheokyin@gmail.com> | 2022-07-26 07:13:56 +0800 |
| commit | ac8babe1d15abbfd90a57765b47da04d42f1051f (patch) | |
| tree | af4454b98a346b851f898e659337fd2c26743054 | |
| parent | 76a86b07067dfe7e15951e264f0c4398e34bc618 (diff) | |
| download | perlweeklychallenge-club-ac8babe1d15abbfd90a57765b47da04d42f1051f.tar.gz perlweeklychallenge-club-ac8babe1d15abbfd90a57765b47da04d42f1051f.tar.bz2 perlweeklychallenge-club-ac8babe1d15abbfd90a57765b47da04d42f1051f.zip | |
Raku solutions (Week 175)
| -rw-r--r-- | challenge-175/cheok-yin-fung/raku/ch-1.raku | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-175/cheok-yin-fung/raku/ch-1.raku b/challenge-175/cheok-yin-fung/raku/ch-1.raku index f73acba086..946cf0a043 100644 --- a/challenge-175/cheok-yin-fung/raku/ch-1.raku +++ b/challenge-175/cheok-yin-fung/raku/ch-1.raku @@ -19,7 +19,7 @@ sub last_sun_year ($year) { @ans.push($n); } my $ny = Date.new("{$year+1}-01-01"); - my $n = $ny.earlier(days => $ny.day-of-week); + my $n = lastsun $ny; @ans.push($n); return @ans; } |