No one has addressed the problem. Here is debugger code:

  DB<8> x chop(@a = ('abc','def','ghi'))
0  'c'
  DB<9> @a = qw( abc def ghi )          

  DB<10> x chop(@a)                      
0  'i'
[download]

This feels so very wrong. What is that list assignment doing to chop()? Is it, for some reason, returning the last element assigned? All of the elements in the array are modified. Yet there are different return values. This is ungood.

This occurs in 5.6.0. And it happens in bleadperl. This is a bug. It feels so bad.

japhy -- Perl and Regex Hacker