Re^4: Mystery interaction between split and gobbling arrays

[saintmike]

You realize that your additional commas are completely ignored by the perl interpreter?

perl -MO=Deparse,-P -e 'my ($x, @y) = (1,2,,,,,); print $#y'
my($x, @y) = (1, 2);
print $#y;
-e syntax OK

[kcott]

I'm not entirely sure where you're heading with this.

I posted some information that turned out not to be useful to you. I acknowledged this in what I believed to be a pleasant manner. To be honest, that should have been the end of it.

"You realize that your additional commas are completely ignored by the perl interpreter?"

Yes.

perl -MO=Deparse,-P -e 'my ($x, @y) = (1,2,,,,,); print $#y'

B::Deparse's -P option disables prototype checking. Including it was probably an error given there's no function calls to deparse and this thread has nothing to do with prototypes. You get the same output without it:

$ perl -MO=Deparse -e 'my ($x, @y) = (1,2,,,,,); print $#y'
my($x, @y) = (1, 2);
print $#y;
-e syntax OK

I occasionally use the -p option. This adds extra parentheses which can sometimes be useful; although, in this instance, it only appears to add clutter:

$ perl -MO=Deparse,-p -e 'my ($x, @y) = (1,2,,,,,); print $#y'
(my($x, @y) = (1, 2));
print($#y);
-e syntax OK