Help for this page

Select Code to Download


  1. or download this
    $ perl -MO=Deparse,-p -e 'my $a, $x, $y, $z = foo()'
    (my($a), $x, $y, ($z = foo()));
    
  2. or download this
    $ perl -w -e 'my $a, $x, $y, $z = foo()'
    Parentheses missing around "my" list at -e line 1.
    ...
    Name "main::z" used only once: possible typo at -e line 1.
    Name "main::y" used only once: possible typo at -e line 1.
    Undefined subroutine &main::foo called at -e line 1.