diff options
| -rw-r--r-- | challenge-110/mark-anderson/raku/ch-1.raku | 5 | ||||
| -rw-r--r-- | challenge-110/mark-anderson/raku/ch-1.txt | 5 | ||||
| -rw-r--r-- | challenge-110/mark-anderson/raku/ch-2.raku | 5 | ||||
| -rw-r--r-- | challenge-110/mark-anderson/raku/ch-2.txt | 5 |
4 files changed, 20 insertions, 0 deletions
diff --git a/challenge-110/mark-anderson/raku/ch-1.raku b/challenge-110/mark-anderson/raku/ch-1.raku new file mode 100644 index 0000000000..4bac1a094e --- /dev/null +++ b/challenge-110/mark-anderson/raku/ch-1.raku @@ -0,0 +1,5 @@ +#!/usr/bin/env raku + +.say for "ch-1.txt".IO.lines + +.grep(/ ^ [ \s\+\d\d || \(\d\d\) || \d**4 ] \s \d**10 $ /); diff --git a/challenge-110/mark-anderson/raku/ch-1.txt b/challenge-110/mark-anderson/raku/ch-1.txt new file mode 100644 index 0000000000..48d6254741 --- /dev/null +++ b/challenge-110/mark-anderson/raku/ch-1.txt @@ -0,0 +1,5 @@ +0044 1148820341 + +44 1148820341 + 44-11-4882-0341 +(44) 1148820341 + 00 1148820341 diff --git a/challenge-110/mark-anderson/raku/ch-2.raku b/challenge-110/mark-anderson/raku/ch-2.raku new file mode 100644 index 0000000000..e2cd9534d7 --- /dev/null +++ b/challenge-110/mark-anderson/raku/ch-2.raku @@ -0,0 +1,5 @@ +#!/usr/bin/env raku + +say .map(*.join(",")).join("\n") given + +[Z] "ch-2.txt".IO.lines.map(*.split(",")); diff --git a/challenge-110/mark-anderson/raku/ch-2.txt b/challenge-110/mark-anderson/raku/ch-2.txt new file mode 100644 index 0000000000..716ebdce75 --- /dev/null +++ b/challenge-110/mark-anderson/raku/ch-2.txt @@ -0,0 +1,5 @@ +name,age,sex +Mohammad,45,m +Joe,20,m +Julie,35,f +Cristina,10,f |