Sierpinski Fractal by niha

$_=' /\ 
/__\
'
50.upto(getc){t="";$_=gsub(/.+/){t+=$&*2+$/;$&.center~/$/*2}+t}
$><<gsub(/ +$/,'')

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

download

return top