diff options
| -rw-r--r-- | challenge-201/wambash/raku/ch-1.raku | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/challenge-201/wambash/raku/ch-1.raku b/challenge-201/wambash/raku/ch-1.raku new file mode 100644 index 0000000000..5a45650e56 --- /dev/null +++ b/challenge-201/wambash/raku/ch-1.raku @@ -0,0 +1,17 @@ +#!/usr/bin/env raku + +sub missing-numbers (+@list) { + 0 .. @list + andthen $_ (-) @list +} + +multi MAIN (Bool :test($)!) { + use Test; + is missing-numbers(0,1,3),2; + is missing-numbers(0,1),2; + done-testing; +} + +multi MAIN (+@list) { + say missing-numbers +@list +} |