aboutsummaryrefslogtreecommitdiff
path: root/challenge-127/abigail/lua
diff options
context:
space:
mode:
authorAbigail <abigail@abigail.be>2021-08-25 18:46:25 +0200
committerAbigail <abigail@abigail.be>2021-08-25 22:01:15 +0200
commit2101433ca05f3a8a59901ae8342b96f06ae5a2bc (patch)
treefeb4173bb1c9ea3c48aa926b38fe52405f8b6c7d /challenge-127/abigail/lua
parentcb7cd6683ee360654a262da4bab492db703c7e1a (diff)
downloadperlweeklychallenge-club-2101433ca05f3a8a59901ae8342b96f06ae5a2bc.tar.gz
perlweeklychallenge-club-2101433ca05f3a8a59901ae8342b96f06ae5a2bc.tar.bz2
perlweeklychallenge-club-2101433ca05f3a8a59901ae8342b96f06ae5a2bc.zip
Solutions in 8 languages for week 127, part 1
Diffstat (limited to 'challenge-127/abigail/lua')
-rw-r--r--challenge-127/abigail/lua/ch-1.lua22
1 files changed, 22 insertions, 0 deletions
diff --git a/challenge-127/abigail/lua/ch-1.lua b/challenge-127/abigail/lua/ch-1.lua
new file mode 100644
index 0000000000..517e884e6c
--- /dev/null
+++ b/challenge-127/abigail/lua/ch-1.lua
@@ -0,0 +1,22 @@
+#!/opt/local/bin/lua
+
+--
+-- See ../README.md
+--
+
+--
+-- Run as: lua ch-1.lua < input-file
+--
+
+for line in io . lines () do
+ local seen = {}
+ local out = 1
+ for number in line : gmatch ("([-+]?[0-9]+)") do
+ if seen [number] then
+ out = 0 -- We have a duplicate
+ else
+ seen [number] = 1
+ end
+ end
+ print (out)
+end