[perl #117415] Use of regex characters as substitution delimiter fails

[via RT]

# New Ticket Created by  Life U. Everything 
# Please include the string:  [perl #117415]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=117415 >


<labster> r: my $a = 'gfoo'; $a ~~ s@gf@f@;
<p6eval> rakudo 897636: OUTPUT«===SORRY!===␤Variable '@f' is not 
declared␤at /tmp/hTstr3dCxL:1␤------> my $a = 'gfoo'; $a ~~ s@gf@f⏏@;␤»


<lue> r: my $a = "gfoo"; $a ~~ s^gf^f^; say $a;
<p6eval> ..rakudo 897636: OUTPUT«===SORRY!===␤Unrecognized regex 
metacharacter ; (must be quoted to match literally)␤at 
/tmp/a5KNf0HcNh:1␤------> my $a = "gfoo"; $a ~~ s^gf^f^⏏; say 
$a;␤Couldn't find terminator $stop␤at /tmp/a5KNf0HcNh:1␤------> my $a = "g…

It would seem that characters which hold some meaning in regexes can't 
be used to delimit substitutions.