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