aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xchallenge-251/bn-ssotka/raku/ch-251.raku10
1 files changed, 9 insertions, 1 deletions
diff --git a/challenge-251/bn-ssotka/raku/ch-251.raku b/challenge-251/bn-ssotka/raku/ch-251.raku
index 0737dcd5f5..f92e5fec8a 100755
--- a/challenge-251/bn-ssotka/raku/ch-251.raku
+++ b/challenge-251/bn-ssotka/raku/ch-251.raku
@@ -23,6 +23,14 @@ sub concat (@ints) {
return (@ints[0].Str ~ @ints[*-1].Str).Int + concat(@ints[1..*-2]);
}
-sub MAIN (*@ints){
+multi MAIN (*@ints){
say concat(@ints);
}
+multi MAIN {
+ my @tests = ((6, 12, 25, 1),
+ (10, 7, 31, 5, 2, 2),
+ (1, 2, 10));
+ for @tests -> @t {
+ say concat(@t);
+ }
+} \ No newline at end of file