diff options
| -rw-r--r-- | challenge-117/luc65r/README | 1 | ||||
| -rw-r--r-- | challenge-117/luc65r/input.txt | 14 | ||||
| -rwxr-xr-x | challenge-117/luc65r/raku/ch-1.raku | 6 |
3 files changed, 21 insertions, 0 deletions
diff --git a/challenge-117/luc65r/README b/challenge-117/luc65r/README new file mode 100644 index 0000000000..ae1b87639b --- /dev/null +++ b/challenge-117/luc65r/README @@ -0,0 +1 @@ +Solutions by Lucas Ransan diff --git a/challenge-117/luc65r/input.txt b/challenge-117/luc65r/input.txt new file mode 100644 index 0000000000..5b9d9ab1ce --- /dev/null +++ b/challenge-117/luc65r/input.txt @@ -0,0 +1,14 @@ +11, Line Eleven +1, Line one +9, Line Nine +13, Line Thirteen +2, Line two +6, Line Six +8, Line Eight +10, Line Ten +7, Line Seven +4, Line Four +14, Line Fourteen +3, Line three +15, Line Fifteen +5, Line Five diff --git a/challenge-117/luc65r/raku/ch-1.raku b/challenge-117/luc65r/raku/ch-1.raku new file mode 100755 index 0000000000..07d06622a7 --- /dev/null +++ b/challenge-117/luc65r/raku/ch-1.raku @@ -0,0 +1,6 @@ +#!/usr/bin/env raku + +sub MAIN(Str:D $file = '-') { + my @ns = $file.IO.lines».match(/\d+/)».UInt; + .key.say for (@ns.min .. @ns.max) ∖ @ns; +} |