$(FS=E)=$0{for(;$j?r=(q=$++j==$1)-(FS-=1-2*q)?r" ":r$(m=j):m=substr(r,j=e,m)(r=e);)if(!j)print m}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page