aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMark <53903062+andemark@users.noreply.github.com>2024-03-18 22:28:57 +0000
committerMark <53903062+andemark@users.noreply.github.com>2024-03-18 22:28:57 +0000
commitf569c97f29246520fcbaa56bf92f76b5de9638ff (patch)
treee20e8b4847d7242a23ee9fd5e8652be1b00fb91f
parent384c8b1ef7c1709247a1b4cf7c26e82682079f26 (diff)
downloadperlweeklychallenge-club-f569c97f29246520fcbaa56bf92f76b5de9638ff.tar.gz
perlweeklychallenge-club-f569c97f29246520fcbaa56bf92f76b5de9638ff.tar.bz2
perlweeklychallenge-club-f569c97f29246520fcbaa56bf92f76b5de9638ff.zip
ch-2.raku again
-rw-r--r--challenge-261/mark-anderson/raku/ch-2.raku3
1 files changed, 2 insertions, 1 deletions
diff --git a/challenge-261/mark-anderson/raku/ch-2.raku b/challenge-261/mark-anderson/raku/ch-2.raku
index bc208754a1..2eb6d5830c 100644
--- a/challenge-261/mark-anderson/raku/ch-2.raku
+++ b/challenge-261/mark-anderson/raku/ch-2.raku
@@ -18,5 +18,6 @@ sub multiply-by-two(@a, $s)
take $++
}
- $s + sum @r[@i]
+ return $s unless @i;
+ return @r[@i.tail] * 2
}