[perl #112450] [BUG] ** quantification doesn't work proper with variable interpolation without braces in Rakudo

[Carl Mäsak]

# New Ticket Created by  "Carl Mäsak" 
# Please include the string:  [perl #112450]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=112450 >


<masak> r: say "foooo" ~~ /^ f o ** 4 $/
<p6eval> rakudo 0227a9: OUTPUT«=> <foooo>␤␤»
<masak> r: my $l = 4; say "foooo" ~~ /^ f o ** $l $/
<p6eval> rakudo 0227a9: OUTPUT«#<failed match>␤»
<masak> oh!
<masak> r: my $l = 4; say "foooo" ~~ /^ f o ** {$l} $/
<p6eval> rakudo 0227a9: OUTPUT«=> <foooo>␤␤»
* masak submits rakudobug

I expect all three to yield the same successful match.