"#{t='thir'\x0d
b=%w[zero one two three four five six seven eight nine ten eleven twelve]\x0d
x=b[0,13]\x0d
g=['fif']+b[6,2]+%w[eigh nine]\x0d
([t,'four']+g).each{|i|x+=[i+'teen']}\x0d
(['twen',t,'for']+g).each{|u|j=u+'ty';x+=[j];9.times{|i|x+=[j+' '+b[i+1]]}}\x0d
puts x,'one hundred'}"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).