[perl #120897] Malformed replacement part; couldn't find final /

[via RT]

# New Ticket Created by  Bartłomiej Palmowski 
# Please include the string:  [perl #120897]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=120897 >


Hi,

$ perl6 -v
This is perl6 version 2013.12 built on parrot 5.9.0 revision 0


Rotwang: r: Str ~~ s/$/a/
camelia: rakudo-jvm 174727: OUTPUT«(timeout)»
camelia: ..rakudo-parrot 174727:
OUTPUT«␀␀␀[␀␀␀3␀␀␀1␀␀␀m␀␀␀=␀␀␀=␀␀␀=␀␀␀␀␀␀[␀␀␀0␀␀␀m␀␀␀S␀␀␀O␀␀␀R␀␀␀R␀␀␀Y␀␀␀!␀␀␀␀␀␀[␀␀␀3␀␀␀1␀␀␀m␀␀␀=␀␀␀=␀␀␀=␀…»
Rotwang: "Malformed replacement part; couldn't find final /" that's what
camelia is trying to say
Rotwang: it seems that $/ is interpreted as scalar, I guess this shouldn't
happen

$ perl6 -e 'Str ~~ s/$/a/'
[31m===[0mSORRY![31m===[0m Error while compiling -e
Malformed replacement part; couldn't find final /
at -e:1
------> [32mStr ~~ s/$/a/[33mÏ#[31m<EOL>[0m
    expecting any of:
        postfix
        infix stopper
        infix or meta-infix
        prefix or term
        prefix or meta-prefix
$