diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2021-04-26 16:47:32 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2021-04-26 16:47:32 +0100 |
| commit | 138613078aaa43de660bfc9ed57a2bbfd72a127b (patch) | |
| tree | 0368924fbc9eb68958d4d676b7a870ef314e013a | |
| parent | 1ff197d81f941c3dd35d77bec8a0326807e8d2b1 (diff) | |
| parent | 048b5243efd43d4d0eb5d8cab6abe82990205d63 (diff) | |
| download | perlweeklychallenge-club-138613078aaa43de660bfc9ed57a2bbfd72a127b.tar.gz perlweeklychallenge-club-138613078aaa43de660bfc9ed57a2bbfd72a127b.tar.bz2 perlweeklychallenge-club-138613078aaa43de660bfc9ed57a2bbfd72a127b.zip | |
Merge pull request #3959 from andemark/branch-for-challenge-110
Branch for challenge 110
| -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 |