[perl #111766] [BUG] Lexical lookup doesn't work properly from an END block to a surrounding BEGIN block in Rakudo

[Carl Mäsak]

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


<masak> nom: BEGIN { my $a = 42; END { say $a } }
<p6eval> rakudo fee891: OUTPUT«Any()␤»
* masak submits rakudobug
<masak> nom: my $a = 42; END { say $a }
<p6eval> rakudo fee891: OUTPUT«42␤»
<masak> both should work, IMNSHO.