aboutsummaryrefslogtreecommitdiff
path: root/challenge-154/abigail/lua/ch-1.lua
diff options
context:
space:
mode:
Diffstat (limited to 'challenge-154/abigail/lua/ch-1.lua')
-rw-r--r--challenge-154/abigail/lua/ch-1.lua22
1 files changed, 22 insertions, 0 deletions
diff --git a/challenge-154/abigail/lua/ch-1.lua b/challenge-154/abigail/lua/ch-1.lua
new file mode 100644
index 0000000000..2c36a2cf35
--- /dev/null
+++ b/challenge-154/abigail/lua/ch-1.lua
@@ -0,0 +1,22 @@
+#!/opt/local/bin/lua
+
+--
+-- See https://theweeklychallenge.org/blog/perl-weekly-challenge-154
+--
+
+--
+-- Run as: lua ch-1.lua < input-file
+--
+
+local p = {PERL = 1, PELR = 1, PREL = 1, PRLE = 1, PLER = 1, PLRE = 1,
+ EPRL = 1, EPLR = 1, ERPL = 1, ERLP = 1, ELPR = 1, ELRP = 1,
+ REPL = 1, RELP = 1, RPEL = 1, RPLE = 1, RLEP = 1, RLPE = 1,
+ LERP = 1, LEPR = 1, LREP = 1, LRPE = 1, LPER = 1, LPRE = 1,}
+
+for line in io . lines () do
+ p [line] = nil
+end
+
+for key, _ in pairs (p) do
+ print (key)
+end