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