{for(;c=substr($1,++i,1);gsub(/./,c"& ",s)(t=t s))s=$2;$0=t}sub(/.$/,t=i=_)