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


$ perl6 -e 'my @a = 1,2,3,4,5; @a[1]:delete; .say for @a[0..*]'
1

$ perl6 -e 'my @a = 1,2,3,4,5; @a[1]:delete; .say for @a[0..4]'
1
(Any)
3
4
5


This is also the cause of the following splice behavior:

$ perl6 -e 'my @a = 1,2,3,4,5; @a[1]:delete; .say for @a.splice(0)'
1

$ perl6 -e 'my @a = 1,2,3,4,5; @a[1]:delete; .say for @a.splice'
1
(Any)
3
4
5

Reply via email to