aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAbigail <abigail@abigail.be>2021-03-29 18:15:18 +0200
committerAbigail <abigail@abigail.be>2021-03-29 18:15:18 +0200
commit74674b61d0b644177f71423b92c3ca06e9c86fd3 (patch)
treec9a43ea8050300ba6b2faab33386bffca6e3e566
parent65daa19f792a11fa58f41976422039fbc0bc83c7 (diff)
downloadperlweeklychallenge-club-74674b61d0b644177f71423b92c3ca06e9c86fd3.tar.gz
perlweeklychallenge-club-74674b61d0b644177f71423b92c3ca06e9c86fd3.tar.bz2
perlweeklychallenge-club-74674b61d0b644177f71423b92c3ca06e9c86fd3.zip
Node.js solution for week 106, part 1
-rw-r--r--challenge-106/abigail/README.md1
-rw-r--r--challenge-106/abigail/node/ch-1.js21
2 files changed, 22 insertions, 0 deletions
diff --git a/challenge-106/abigail/README.md b/challenge-106/abigail/README.md
index d3e59b9695..136cddfcc3 100644
--- a/challenge-106/abigail/README.md
+++ b/challenge-106/abigail/README.md
@@ -25,6 +25,7 @@ Output: 0
* [Bash](perl/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-106/abigail/node/ch-1.js b/challenge-106/abigail/node/ch-1.js
new file mode 100644
index 0000000000..027bc12390
--- /dev/null
+++ b/challenge-106/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', _ => console . log (
+ _ . split (/\s+/) // Split on white space
+ . map (_ => +_) // Numify
+ . sort () // Sort
+ . reduce ((max, _, i, N) => { // Find max difference
+ return i > 0 && (N [i] - N [i - 1]) > max
+ ? (N [i] - N [i - 1]) : max
+ }, 0)))