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