segs by nn

$(FS=_)=$0{for(n=NF;n--;o=_)for(i=n;i++<NF;)print o=o$i}

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

download

return top