diff options
| author | Andrew Shitov <mail@andreyshitov.com> | 2025-07-26 08:12:34 +0200 |
|---|---|---|
| committer | Andrew Shitov <mail@andreyshitov.com> | 2025-07-26 08:12:34 +0200 |
| commit | 4e5926710fe034bebb86b092d1607a5ed783f5d2 (patch) | |
| tree | 275aede51bf3b6eec0066a96bb87e454a3130c79 | |
| parent | 28d7ebeb73885ec093873abbd71a78d0e7de66c6 (diff) | |
| download | perlweeklychallenge-club-4e5926710fe034bebb86b092d1607a5ed783f5d2.tar.gz perlweeklychallenge-club-4e5926710fe034bebb86b092d1607a5ed783f5d2.tar.bz2 perlweeklychallenge-club-4e5926710fe034bebb86b092d1607a5ed783f5d2.zip | |
typo
| -rw-r--r-- | challenge-332/ash/raku/ch-2.raku | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/challenge-332/ash/raku/ch-2.raku b/challenge-332/ash/raku/ch-2.raku index 77a9000603..5ba0a04a01 100644 --- a/challenge-332/ash/raku/ch-2.raku +++ b/challenge-332/ash/raku/ch-2.raku @@ -1,10 +1,10 @@ # Task 2 of the Weekly Challenge 332 # https://theweeklychallenge.org/blog/perl-weekly-challenge-332/#TASK2 -say are-oll-letters-odd('weekly'); # False -say are-oll-letters-odd('perl'); # True -say are-oll-letters-odd('challenge'); # False +say are-all-letters-odd('weekly'); # False +say are-all-letters-odd('perl'); # True +say are-all-letters-odd('challenge'); # False -sub are-oll-letters-odd($str) { +sub are-all-letters-odd($str) { return !($str.comb.Bag.first: *.value %% 2); } |
