[perl #126861] assignment of a Slip to array subscript does not slip

[via RT]

# New Ticket Created by  Wenzel Peppmeyer 
# Please include the string:  [perl #126861]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=126861 >


my @a; @a[0] = |(1,2,3); dd @a;
# OUTPUT«Array $var = $[(1, 2, 3),]␤»

# should be the same as:
my @a = |(1,2,3); dd @a;
# OUTPUT«Array $var = $[1, 2, 3]␤»