aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHVukman <peterslopp@googlemail.com>2025-08-24 11:19:53 +0200
committerGitHub <noreply@github.com>2025-08-24 11:19:53 +0200
commitd1fc876cc99e0d6cb2cfa41377d2098b3a5aecbf (patch)
tree6c8633f388ad3d653dde2f88c9dfd52d3afda01f
parent5c71e1ef11ec1d5fce6fd6d0d3ea3230e3d82b68 (diff)
downloadperlweeklychallenge-club-d1fc876cc99e0d6cb2cfa41377d2098b3a5aecbf.tar.gz
perlweeklychallenge-club-d1fc876cc99e0d6cb2cfa41377d2098b3a5aecbf.tar.bz2
perlweeklychallenge-club-d1fc876cc99e0d6cb2cfa41377d2098b3a5aecbf.zip
Create 335_p1.lua
-rw-r--r--challenge-335/hvukman/lua/335_p1.lua50
1 files changed, 50 insertions, 0 deletions
diff --git a/challenge-335/hvukman/lua/335_p1.lua b/challenge-335/hvukman/lua/335_p1.lua
new file mode 100644
index 0000000000..fae6ac2a3a
--- /dev/null
+++ b/challenge-335/hvukman/lua/335_p1.lua
@@ -0,0 +1,50 @@
+local inp = {{ "bella", "label", "roller" }, { "cool", "lock", "cook" } , { "hello", "world", "pole"}
+ , { "abc", "def", "ghi" }, { "aab", "aac", "aaa"}}
+
+
+function Common(X)
+ local unique = {}
+
+
+ for i,v in ipairs(X) do
+ for j=1,#v do
+ local sub = string.sub(v,j,j)
+ unique[sub] = true
+ end
+ end
+
+
+ local res = {}
+ io.write ("Output: ")
+ -- check each unique character
+ for i,_ in pairs(unique) do
+ local res = {}
+ for _,v in ipairs(X) do
+
+ local sum =0
+ for index in (v):gmatch(i) do
+ sum = sum + 1
+ -- print("index ", index)
+ end
+ if sum>0 then
+ table.insert(res,sum)
+ end
+ end
+
+ if #res==3 then
+ table.sort(res)
+
+ for jj=1,res[1] do
+ io.write (i," ")
+ end
+
+ end
+
+ end
+ print("")
+end
+
+for i,v in ipairs(inp) do
+ Common(v)
+
+end