$0=gensub(/.(.)/,"&\\1","g")