aboutsummaryrefslogtreecommitdiff
path: root/challenge-336
diff options
context:
space:
mode:
authorScimon <simon.proctor@gmail.com>2025-08-26 10:23:47 +0100
committerScimon <simon.proctor@gmail.com>2025-08-26 10:23:47 +0100
commit993ea6c728733372d0b64ff57c115d54a1e7ae14 (patch)
treef287e183e63b52041ce2942d4ae6cdd9b5e15dd1 /challenge-336
parenta7a4c17b8063faecae6c17225be92107fe90f088 (diff)
downloadperlweeklychallenge-club-993ea6c728733372d0b64ff57c115d54a1e7ae14.tar.gz
perlweeklychallenge-club-993ea6c728733372d0b64ff57c115d54a1e7ae14.tar.bz2
perlweeklychallenge-club-993ea6c728733372d0b64ff57c115d54a1e7ae14.zip
Part 1 done
Diffstat (limited to 'challenge-336')
-rw-r--r--challenge-336/simon-proctor/raku/ch-2.raku12
1 files changed, 12 insertions, 0 deletions
diff --git a/challenge-336/simon-proctor/raku/ch-2.raku b/challenge-336/simon-proctor/raku/ch-2.raku
new file mode 100644
index 0000000000..41448bbc4d
--- /dev/null
+++ b/challenge-336/simon-proctor/raku/ch-2.raku
@@ -0,0 +1,12 @@
+#!/usr/bin/env raku
+
+multi sub MAIN(:t(:$test)) is hidden-from-USAGE {
+ use Test;
+ is final-score("5","2","C","D","+"), 30;
+ is final-score("5","-2","4","C","D","9","+","+"), 27;
+ is final-score("7","D","D","C","+","3"), 45;
+ is final-score("-5","-10","+","D","C","+"), -55;
+ is final-score("3","6","+","D","C","8","+","D","-2","C","+"), 128;
+ done-testing;
+
+}