ORS=substr(a=a$(RS="_")FS,i++,1)