Help for this page

Select Code to Download


  1. or download this
    perl -MO=Deparse,-P -e 'my ($x, @y) = (1,2,,,,,); print $#y'
  2. or download this
    $ perl -MO=Deparse -e 'my ($x, @y) = (1,2,,,,,); print $#y'
my($x, @y) = (1, 2);
print $#y;
-e syntax OK
  3. or download this
    $ perl -MO=Deparse,-p -e 'my ($x, @y) = (1,2,,,,,); print $#y'
(my($x, @y) = (1, 2));
print($#y);
-e syntax OK