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