duplicate certain lines _A_ by murky-satyr

I:=0.K:=stdin upTo:$
.stdin linesDo:[:x|x displayNl.
K~('\b%1\b'bindWith:(I:=I+1))and:[x displayNl]]

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

download

return to the top page