aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMark <53903062+andemark@users.noreply.github.com>2023-05-01 09:56:04 +0000
committerMark <53903062+andemark@users.noreply.github.com>2023-05-01 09:56:04 +0000
commitc0d1d8f78cbe131fa457e25e9a08f84a11975573 (patch)
tree33542b92705fbf996308364c20c614e35a32f45a
parent75da7397fe039b92f760d5795e9073f5f4ab7f71 (diff)
downloadperlweeklychallenge-club-c0d1d8f78cbe131fa457e25e9a08f84a11975573.tar.gz
perlweeklychallenge-club-c0d1d8f78cbe131fa457e25e9a08f84a11975573.tar.bz2
perlweeklychallenge-club-c0d1d8f78cbe131fa457e25e9a08f84a11975573.zip
Challenge 215 Solutions (Raku)
-rw-r--r--challenge-215/mark-anderson/raku/ch-2.raku2
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-215/mark-anderson/raku/ch-2.raku b/challenge-215/mark-anderson/raku/ch-2.raku
index 946f31161d..c9d8fdccb5 100644
--- a/challenge-215/mark-anderson/raku/ch-2.raku
+++ b/challenge-215/mark-anderson/raku/ch-2.raku
@@ -9,5 +9,5 @@ nok number-placement(<1 1 0 0 1 0 0 0 1>, 2);
sub number-placement($list, $count)
{
- $list.join ~~ m:g/ 00 <before 0> / >= $count
+ $list.join ~~ m:g/ 00 <?before 0> / >= $count
}