diff options
| author | Andrew Shitov <mail@andreyshitov.com> | 2025-05-06 09:08:22 +0200 |
|---|---|---|
| committer | Andrew Shitov <mail@andreyshitov.com> | 2025-05-06 09:08:22 +0200 |
| commit | 0321b2f89be26b644aa6f86d4ded0e2a3d9f8f98 (patch) | |
| tree | ac08f8e221f09f3677834de2d97846964954a3c7 | |
| parent | b352d1a9bb5ac9e12ad6a41e5cbd04130d478f6a (diff) | |
| download | perlweeklychallenge-club-0321b2f89be26b644aa6f86d4ded0e2a3d9f8f98.tar.gz perlweeklychallenge-club-0321b2f89be26b644aa6f86d4ded0e2a3d9f8f98.tar.bz2 perlweeklychallenge-club-0321b2f89be26b644aa6f86d4ded0e2a3d9f8f98.zip | |
simplify
| -rw-r--r-- | challenge-320/ash/raku/ch-1a.raku | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/challenge-320/ash/raku/ch-1a.raku b/challenge-320/ash/raku/ch-1a.raku index e4917dbbbd..dd1036373c 100644 --- a/challenge-320/ash/raku/ch-1a.raku +++ b/challenge-320/ash/raku/ch-1a.raku @@ -1,8 +1,8 @@ # Task 1 of the Weekly Challenge 320 # https://theweeklychallenge.org/blog/perl-weekly-challenge-320/#TASK1 -my @ints = -3, -2, -1, 1, 2, 3; # 3 -# my @ints = -2, -1, 0, 0, 1; # 2 +# my @ints = -3, -2, -1, 1, 2, 3; # 3 +my @ints = -2, -1, 0, 0, 1; # 2 # my @ints = 1, 2, 3, 4; # 4 -say @ints.grep(* != 0).classify(* < 0)>>.elems.values.max; +say @ints.grep(*).classify(* < 0)>>.elems.values.max; |