[perl #74836] [BUG] BEGIN blocks run outside the lexical scope of the setting

[via RT]

# New Ticket Created by  Stefan O'Rear 
# Please include the string:  [perl #74836]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=74836 >


17:38 < sorear> rakudo: say BEGIN { rand }
17:38 < p6eval> rakudo c4857a: OUTPUT«Could not find sub &rand␤current instr.: 
                '_block11' pc 0 (EVAL_1:9)␤»
17:39 < sorear> rakudo: say rand
17:39 < p6eval> rakudo c4857a: OUTPUT«0.555681770990731␤»