[perl #119877] $/ values not populated in block when using subcapture on Rakudo-JVM

[via RT]

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


The test should demonstrate what I mean.

use Test;

plan(1);

my $inner-match;

my regex word { \w+ }

my regex my-match { <word> { $inner-match := $<word> } }

'foo' ~~ /<my-match>/;
ok($inner-match eq 'foo');