awk/testdir/t.sub3

length($1) {sub(substr($1,1,1),"(&)"); print}