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