split($0,A,i=_){for(NF=OFS="/";a=A[++i];$j=$j a)j=++B[NR,a]}1