$ perl -MO=Deparse -e " s\\\g "
s///g;
-e syntax OK

$ perl -MO=Deparse -e " s«««g "
s///g;
-e syntax OK