$ perl -E 'my ($x, @y) = (1,2,); say $#y' 0 #### $ perl -E 'my ($x, @y) = (1,2,,,,,); say $#y' 0