# New Ticket Created by  Lars Dɪᴇᴄᴋᴏᴡ 迪拉斯 
# Please include the string:  [perl #133772]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=133772 >


rpm -qi rakudo | rg Version
Version     : 2018.12

    my Str $s = 'abc';
    my @l = $s.comb.map(-> $g { /$g/ });
    # time passes
    @l.perl.say

Expect:

    [/a/, /b/, /c/]

Got:

    [/$g/, /$g/, /$g/]

The generated regexes do work, they just display wrong/useless. At the time I 
inspect the data structure, $g had been assigned multiple times with varying 
values and is long already out of scope.

Reply via email to