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