[perl #102650] [BUG] A variable has the wrong value in a statment-modifier for look in Rakudo

[Carl Mäsak]

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


<grondilu> perl6: my $foo; sub test { my $bar = $foo++; say $bar and
test for $bar ?? () !! ^2 }; test();
<p6eval> niecza v11: OUTPUT«Any()␤Any()␤»
<p6eval> ..pugs b927740: OUTPUT«0␤0␤»
<p6eval> ..rakudo 878004: OUTPUT«0␤1␤»
<moritz> what would you expect?
<grondilu> 0 0
<moritz> right, if $bar is 1, then the for-loop shouldn't run
<moritz> so, rakudobug
<grondilu> the verbose explanation, and how this is related to the
sudoku algorithm:  http://pastebin.com/7bnjmjAu
* masak submits rakudobug