diff options
| -rw-r--r-- | challenge-330/hvukman/lua/330_p2.lua | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/challenge-330/hvukman/lua/330_p2.lua b/challenge-330/hvukman/lua/330_p2.lua new file mode 100644 index 0000000000..e6e56fb801 --- /dev/null +++ b/challenge-330/hvukman/lua/330_p2.lua @@ -0,0 +1,25 @@ +function TitleCapital (a)
+ words = {}
+ for word in a:gmatch("%w+") do
+ table.insert(words, word)
+ end
+ for i,v in ipairs(words) do
+ if string.len(v)>2 then
+ local char = string.sub(v, 1, 1)
+ io.write(string.upper(char))
+ for i = 2, string.len(v) do
+ local sub_char = string.sub(v, i, i)
+ io.write(string.lower(sub_char))
+ end
+ else
+ for i = 1, string.len(v) do
+ local sub_char = string.sub(v, i, i)
+ io.write(string.lower(sub_char))
+ end
+ end
+ io.write(" ")
+ end
+
+end
+
+TitleCapital("PERL IS gREAT")
\ No newline at end of file |
