Still reproducible (2017.11, HEAD(5929887)), but is supposed to work?
On 2015-02-09 17:43:52, rayd...@cyberuniverses.com wrote:
> m: my $a; BEGIN { $a := 1; say $a; }; say $a;
> rakudo-{parrot,moar} 0cb22e: OUTPUT«1(Any)»
>
> m: my $a; BEGIN { $a = 1; say $a; }; say $a; # works with assignment
>
# New Ticket Created by
# Please include the string: [perl #123776]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=123776 >
m: my $a; BEGIN { $a := 1; say $a; }; say $a;
rakudo-{parrot,moar} 0cb22e: OUTPUT«1(Any)»
m: my $a
