blob: 88f2ad2ab28274b82ae0d422540dd5753c797000 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
#!/usr/bin/env lua
--[[
Challenge 096
TASK #1 > Reverse Words
Submitted by: Mohammad S Anwar
You are given a string $S.
Write a script to reverse the order of words in the given string. The string
may contain leading/trailing spaces. The string may have more than one space
between words in the string. Print the result without leading/trailing spaces
and there should be only one space between words.
Example 1:
Input: $S = "The Weekly Challenge"
Output: "Challenge Weekly The"
--]]
-- concatenate all words (to be able to split multiple spaces)
text = ""
for i=1,#arg do text = text..arg[i].." "; end
-- spit by spaces, store in reverse order
words = {}
for word in string.gmatch(text, "([^%s]+)") do
table.insert(words, 1, word)
end
io.write(table.concat(words, " "), "\n")
|
