ref: 0e21daeb990191793cea556ab63fd68e7b3b48ec dir: /test/t.gsub3/
length($1) {gsub(substr($1,1,1),"(&)"); print}