$y = gsub($x, "A"i,   "")
