Self Numbers by leonid (test)

a=*1..3000
3000.times{|i|a-=[i%10+i/10%10+i/100%10+i/1000+i]}
p *a

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

download

return top