diff options
| -rwxr-xr-x | challenge-251/bn-ssotka/raku/ch-251.raku | 10 |
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 |
