From 8487fe3f219c99dc720f99e2d53197c211deaf5b Mon Sep 17 00:00:00 2001
From: Abigail <abigail@abigail.freedom.nl>
Date: Mon, 31 Jan 2022 15:50:18 +0100
Subject: Week 150: Solutions

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

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

diff --git a/challenge-150/abigail/lua/ch-1.lua b/challenge-150/abigail/lua/ch-1.lua
new file mode 100644
index 0000000000..ddaa1237c5
--- /dev/null
+++ b/challenge-150/abigail/lua/ch-1.lua
@@ -0,0 +1,19 @@
+#!/opt/local/bin/lua
+
+--
+-- See https://theweeklychallenge.org/blog/perl-weekly-challenge-150
+--
+
+--
+-- Run as: lua ch-1.lua < input-file
+--
+
+local LENGTH = 51
+
+for line in io . lines () do
+    local fib_prev, fib_last = line : match ("(%S+) (%S+)")
+    while fib_last : len () < LENGTH do
+        fib_prev, fib_last = fib_last, fib_prev .. fib_last
+    end
+    print (fib_last : sub (LENGTH, LENGTH))
+end
-- 
cgit