{for(OFS=FS=i=_;c=$i;i++&&c>"@"&&s=c s)$i=(j=index(s,c)-1)~/../?c:j}1