b,*a=48 1.upto(99){|i|0until a[b+=1]?i%a[b]<1:a[b]=i puts''<<b b=64}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page