Luke Two by jbb

("#{$.} "+$_).gsub(/.{1,40}\s/){puts$'!=""?(p=$&.split;z=l=0;p.inject{|f,x|f+=" "*(1-l+l=((41-$&.size)/(p.size-1.0)*z+=1).to_i)+x}):$&}while gets

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

download

return top