p=print
s="one two three four five six seven eight nine"p"zero"s:gsub("%w+",p)p[[ten
eleven
twelve
thirteen
fourteen
fifteen
sixteen
seventeen
eighteen
nineteen]]
for x in("twen thir for fif six seven eigh nine"):gmatch"%w+"do
p(x.."ty")for y in s:gmatch"%w+"do p(x.."ty "..y)end
end
p"one hundred"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).