From @masak

<grondilu> perl6​: my %h = (<foo> => []); push %h<foo>, my $foo =
"bar"; say $foo; # I'm a expecting "bar"
<p6eval> pugs b927740, niecza v13-389-g852f0ff​: OUTPUT«bar␤»
<p6eval> ..rakudo ce5cca​: OUTPUT«Any()␤»
<grondilu> rakudo--, niecza++
<moritz> rakudo​: my %h = (<foo> => []); push %h<foo>, (my $foo =
'bar'); say $foo
<p6eval> rakudo ce5cca​: OUTPUT«bar␤»
<grondilu> shoudn't '=' come before ',' ?
<moritz> there are two '=' with different precedence :/
<grondilu> perl6​: my %h = (<foo> => []); my $foo; push %h<foo>, $foo
= "bar"; say $foo; # I'm a expecting "bar"
<p6eval> pugs b927740, niecza v13-389-g852f0ff​: OUTPUT«bar␤»
<p6eval> ..rakudo ce5cca​: OUTPUT«Any()␤»
<grondilu> I'm pretty sure it should give 'bar'
<masak> aye.
<grondilu> notice that it works better with a plain array​:
<grondilu> rakudo​: push my @​a, my $foo = "bar"; say $foo
<p6eval> rakudo ce5cca​: OUTPUT«bar␤»
<masak> do we have an RT ticket for this?
<masak> ISTR we have something about item assignment...
<masak> ah, we have https://rt-archive.perl.org/perl6/Ticket/Display.html?id=67944
<masak> but it's resolved.
* masak submits new rakudobug

From @diakopter

On Tue Jan 31 01​:34​:03 2012, masak wrote​:

<grondilu> perl6​: my %h = (<foo> => []); push %h<foo>, my $foo =
"bar"; say $foo; # I'm a expecting "bar"
<p6eval> pugs b927740, niecza v13-389-g852f0ff​: OUTPUT«bar␤»
<p6eval> ..rakudo ce5cca​: OUTPUT«Any()␤»
<grondilu> rakudo--, niecza++
<moritz> rakudo​: my %h = (<foo> => []); push %h<foo>, (my $foo =
'bar'); say $foo
<p6eval> rakudo ce5cca​: OUTPUT«bar␤»
<grondilu> shoudn't '=' come before ',' ?
<moritz> there are two '=' with different precedence :/
<grondilu> perl6​: my %h = (<foo> => []); my $foo; push %h<foo>, $foo
= "bar"; say $foo; # I'm a expecting "bar"
<p6eval> pugs b927740, niecza v13-389-g852f0ff​: OUTPUT«bar␤»
<p6eval> ..rakudo ce5cca​: OUTPUT«Any()␤»
<grondilu> I'm pretty sure it should give 'bar'
<masak> aye.
<grondilu> notice that it works better with a plain array​:
<grondilu> rakudo​: push my @​a, my $foo = "bar"; say $foo
<p6eval> rakudo ce5cca​: OUTPUT«bar␤»
<masak> do we have an RT ticket for this?
<masak> ISTR we have something about item assignment...
<masak> ah, we have https://rt-archive.perl.org/perl6/Ticket/Display.html?
id=67944
<masak> but it's resolved.
* masak submits new rakudobug

fixed now. marking testneeded.

19​:08 <diakopter> r​: my %h = (<foo> => []); push %h<foo>, my $foo =
"bar"; say $foo; # I'm
  a expecting "bar"
19​:08 <p6eval> rakudo 024843​: OUTPUT«bar␤»
19​:10 <diakopter> r​: my %h = (<foo> => []); my $foo; push %h<foo>, $foo
= "bar"; say $foo;
  # I'm a expecting "bar"
19​:10 <p6eval> rakudo 024843​: OUTPUT«bar␤»

The RT System itself - Status changed from 'new' to 'open'

From @moritz

Now tested in S32-array/push.t

@moritz - Status changed from 'open' to 'resolved'