From 10299a50f27926fb893c8c1d8d625426e77eed79 Mon Sep 17 00:00:00 2001
From: Abigail <abigail@abigail.be>
Date: Mon, 26 Apr 2021 20:13:19 +0200
Subject: Lua solution for week 110, part 1

---
 challenge-110/abigail/lua/ch-1.lua | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 challenge-110/abigail/lua/ch-1.lua

(limited to 'challenge-110/abigail/lua/ch-1.lua')

diff --git a/challenge-110/abigail/lua/ch-1.lua b/challenge-110/abigail/lua/ch-1.lua
new file mode 100644
index 0000000000..a118074744
--- /dev/null
+++ b/challenge-110/abigail/lua/ch-1.lua
@@ -0,0 +1,24 @@
+#!/opt/local/bin/lua
+
+--
+-- See ../README.md
+--
+
+--
+-- Run as: lua ch-1.lua < input-file
+--
+
+for line in io . lines () do
+    local number = line : gsub (" ", "")   -- Remove spaces
+    if                   -- nnnn nnnnnnnnnn
+          number : find ("^[0-9][0-9][0-9][0-9][0-9][0-9][0-9]"   ..
+                          "[0-9][0-9][0-9][0-9][0-9][0-9][0-9]$") or
+                         -- +nn  nnnnnnnnnn
+          number : find ("^%+[0-9][0-9][0-9][0-9][0-9]"           ..
+                          "[0-9][0-9][0-9][0-9][0-9][0-9][0-9]$") or
+                         -- (nn) nnnnnnnnnn
+          number : find ("^%([0-9][0-9]%)[0-9][0-9][0-9]"         ..
+                          "[0-9][0-9][0-9][0-9][0-9][0-9][0-9]$")
+    then  print (line)
+    end
+end
-- 
cgit