On Mon Dec 29 10:17:11 2008, masak wrote:
> rakudo: my @a = <1 2 3 4 5 6>; my @b = (10..16); for @a Z @b
> <-> $a,$b { $a++ }; say @a;
> rakudo 34586: OUTPUT«234567»
> rakudo: my @a = <1 2 3 4 5 6>; my @b = (10..16); for @a Z @b
> <-> $a,$b { $a = $a +1 }; say @a;
> rakudo 34586: OUTPUT«Canno
On Mon Dec 29 10:17:11 2008, masak wrote:
> rakudo: my @a = <1 2 3 4 5 6>; my @b = (10..16); for @a Z @b
> <-> $a,$b { $a++ }; say @a;
> rakudo 34586: OUTPUT«234567»
> rakudo: my @a = <1 2 3 4 5 6>; my @b = (10..16); for @a Z @b
> <-> $a,$b { $a = $a +1 }; say @a;
> rakudo 34586: OUTPUT«Canno
# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #61824]
# in the subject line of all future correspondence about this issue.
# http://rt.perl.org/rt3/Ticket/Display.html?id=61824 >
rakudo: my @a = <1 2 3 4 5 6>; my @b = (10..16); for @a Z @b
<-> $a,$b { $a++ }; say @