From b717aee4ff26c334b1b922fab597147719175c0f Mon Sep 17 00:00:00 2001 From: Mark A Date: Mon, 26 Apr 2021 00:56:32 -0600 Subject: initial --- challenge-110/mark-anderson/raku/ch-1.raku | 6 ++++++ challenge-110/mark-anderson/raku/ch-1.txt | 5 +++++ challenge-110/mark-anderson/raku/ch-2.raku | 5 +++++ challenge-110/mark-anderson/raku/ch-2.txt | 5 +++++ 4 files changed, 21 insertions(+) create mode 100644 challenge-110/mark-anderson/raku/ch-1.raku create mode 100644 challenge-110/mark-anderson/raku/ch-1.txt create mode 100644 challenge-110/mark-anderson/raku/ch-2.raku create mode 100644 challenge-110/mark-anderson/raku/ch-2.txt 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..c0fc86e49e --- /dev/null +++ b/challenge-110/mark-anderson/raku/ch-1.raku @@ -0,0 +1,6 @@ +#!/usr/bin/env raku + +.say for "ch-1.txt".IO.lines + +.grep(/ ^ [ \s\+\d\d | \(\d\d\) | \d\d\d\d ] \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 -- cgit From 653e1766c721fd92f84d36ecca8a811b727dacce Mon Sep 17 00:00:00 2001 From: Mark A Date: Mon, 26 Apr 2021 00:59:07 -0600 Subject: initial --- challenge-110/mark-anderson/raku/ch-1.raku | 1 - 1 file changed, 1 deletion(-) diff --git a/challenge-110/mark-anderson/raku/ch-1.raku b/challenge-110/mark-anderson/raku/ch-1.raku index c0fc86e49e..aaeb60658b 100644 --- a/challenge-110/mark-anderson/raku/ch-1.raku +++ b/challenge-110/mark-anderson/raku/ch-1.raku @@ -3,4 +3,3 @@ .say for "ch-1.txt".IO.lines .grep(/ ^ [ \s\+\d\d | \(\d\d\) | \d\d\d\d ] \s \d**10 $ /); - -- cgit From 048b5243efd43d4d0eb5d8cab6abe82990205d63 Mon Sep 17 00:00:00 2001 From: Mark A Date: Mon, 26 Apr 2021 06:15:05 -0600 Subject: Challenge 110 Solutions (Raku) --- challenge-110/mark-anderson/raku/ch-1.raku | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/challenge-110/mark-anderson/raku/ch-1.raku b/challenge-110/mark-anderson/raku/ch-1.raku index aaeb60658b..4bac1a094e 100644 --- a/challenge-110/mark-anderson/raku/ch-1.raku +++ b/challenge-110/mark-anderson/raku/ch-1.raku @@ -2,4 +2,4 @@ .say for "ch-1.txt".IO.lines -.grep(/ ^ [ \s\+\d\d | \(\d\d\) | \d\d\d\d ] \s \d**10 $ /); +.grep(/ ^ [ \s\+\d\d || \(\d\d\) || \d**4 ] \s \d**10 $ /); -- cgit