duplicate certain lines _C_ by tabasa

while gets\x0d
z=$_\x0d
a=$_.scan(/^((d )*)/)\x0d
if $&\x0d
(a[0][0].size/2+1).times{puts $'}\x0d
else\x0d
puts z\x0d
end\x0d
end

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

download

return top