$X =~ s/\Q$A\E/\Q$B\E/g;  # THIS IS NOT RIGHT

##</code><code>##

    $X =~ s/\Q$A\E/$B/g;  # THIS IS NOT RIGHT