diff options
| author | Mark <53903062+andemark@users.noreply.github.com> | 2024-05-21 07:17:30 +0000 |
|---|---|---|
| committer | Mark <53903062+andemark@users.noreply.github.com> | 2024-05-21 07:17:30 +0000 |
| commit | f97c3980ceb9e55f7e1c60abcf9a7171db8f96bc (patch) | |
| tree | 29159cb9ec0e5237dbe558642e4ee090b0e52e27 | |
| parent | ce76e812bc5046e95203adcea1686182969be12d (diff) | |
| download | perlweeklychallenge-club-f97c3980ceb9e55f7e1c60abcf9a7171db8f96bc.tar.gz perlweeklychallenge-club-f97c3980ceb9e55f7e1c60abcf9a7171db8f96bc.tar.bz2 perlweeklychallenge-club-f97c3980ceb9e55f7e1c60abcf9a7171db8f96bc.zip | |
ch-1.raku
| -rw-r--r-- | challenge-270/mark-anderson/raku/ch-1.raku | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-270/mark-anderson/raku/ch-1.raku b/challenge-270/mark-anderson/raku/ch-1.raku index b39ed7df06..6503db87f3 100644 --- a/challenge-270/mark-anderson/raku/ch-1.raku +++ b/challenge-270/mark-anderson/raku/ch-1.raku @@ -15,6 +15,6 @@ is special-positions([ sub special-positions(@m) { - @m .= grep(*.grep(1).one); - + ([Z] @m).grep(*.grep(1).one) + @m .= grep(*.one); + + ([Z] @m).grep(*.one) } |