diff options
| author | Abigail <abigail@abigail.be> | 2021-04-28 19:14:42 +0200 |
|---|---|---|
| committer | Abigail <abigail@abigail.be> | 2021-04-28 19:14:42 +0200 |
| commit | 5581b0741dada9a8f9035a950a0e98626b56f629 (patch) | |
| tree | dac9a8d02fec48fa916a444606448a3a11417cca | |
| parent | 8134ac8c6880adbbf6184143a02f62091288839e (diff) | |
| download | perlweeklychallenge-club-5581b0741dada9a8f9035a950a0e98626b56f629.tar.gz perlweeklychallenge-club-5581b0741dada9a8f9035a950a0e98626b56f629.tar.bz2 perlweeklychallenge-club-5581b0741dada9a8f9035a950a0e98626b56f629.zip | |
Node.js solution for week 110, part 1
| -rw-r--r-- | challenge-110/abigail/README.md | 1 | ||||
| -rw-r--r-- | challenge-110/abigail/node/ch-1.js | 21 | ||||
| -rw-r--r-- | challenge-110/abigail/t/ouput-2-1.exp | 3 |
3 files changed, 22 insertions, 3 deletions
diff --git a/challenge-110/abigail/README.md b/challenge-110/abigail/README.md index f8cb59375d..10c12592fa 100644 --- a/challenge-110/abigail/README.md +++ b/challenge-110/abigail/README.md @@ -45,6 +45,7 @@ can completly ignore any white space in the input. [Bash](bash/ch-1.sh) [C](c/ch-1.c) [Lua](lua/ch-1.lua) +[Node.js](node/ch-1.js) [Perl](perl/ch-1.pl) ### Blog diff --git a/challenge-110/abigail/node/ch-1.js b/challenge-110/abigail/node/ch-1.js new file mode 100644 index 0000000000..783f6ef0be --- /dev/null +++ b/challenge-110/abigail/node/ch-1.js @@ -0,0 +1,21 @@ +#!/usr/local/bin/node + +// +// See ../README.md +// + +// +// Run as: node ch-1.js < input-file +// + +require ('readline') +. createInterface ({input: process . stdin}) +. on ('line', _ => { + if (_ . replace (/\s+/g, "") // Remove spaces + . replace (/^\+/, "00") // Replace leading '+' with 00 + . replace (/^\([0-9][0-9]\)/, "0000") // Replace leading '(NN)' + // with 0000 + . match (/^[0-9]{14}$/)) { // Match 14 digits + console . log (_) + } +}) diff --git a/challenge-110/abigail/t/ouput-2-1.exp b/challenge-110/abigail/t/ouput-2-1.exp deleted file mode 100644 index 0cb1eb87a1..0000000000 --- a/challenge-110/abigail/t/ouput-2-1.exp +++ /dev/null @@ -1,3 +0,0 @@ -name,Mohammad,Joe,Julie,Cristina -age,45,20,35,10 -sex,m,m,f,f |