push @newlines, s/\Q$A\E/$B/rg for @lines;