100 by flagitious

n=%w'one two three four five'+b=%w'six seven eigh nine'
n[7]+='t'
puts:zero,n,'ten
eleven
twelve','%steen
'*7%[z=:thir,n[3],*b=[:fif]+b],[:twen,z,:for,*b].map{|i|[a="#{i}ty","#{a} %s
"*9%n]},'one hundred'

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top