# New Ticket Created by Will Coleda # Please include the string: [perl #105368] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=105368 >
14:09 < [Coke]> my $foo = 42; ($foo, "stuff")[0] = 24; say $foo;14:10 < [Coke]> perl6: my $foo = 42; ($foo, "stuff")[0] = 24; say $foo;14:10 <+p6eval> pugs b927740: OUTPUT«*** Can't modify constant item: VRef <Scalar:0x7f41cc366fa1> at /tmp/g6RkzZzOIu line 1, column 15-38»14:10 <+p6eval> ..rakudo bef928: OUTPUT«Cannot assign to a readonly variable or a value in block <anon> at /tmp/eROaY_J02E:1 in <anon> at /tmp/eROaY_J02E:1»14:10 <+p6eval> ..niecza v12-3-g193ca57: OUTPUT«24»14:10 < [Coke]> b: my $foo = 42; ($foo, "stuff")[0] = 24; say $foo; 14:10 <+p6eval> b 1b7dd1: OUTPUT«24» This is a nom regression from b; test is in t/spec/S02-types/lists.t There are other regressions in the file which may be related. -- Will "Coke" Coleda