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