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