Help for this page

Select Code to Download


  1. or download this
    V:\>perl -MO=Deparse -e "$x = FOO + 7 + 9"
$x = 'FOO' + 7 + 9;
...
use constant ('FOO', 8);
$x = 24;
-e syntax OK
  2. or download this
    V:\>perl -MO=Deparse -e "sub foo {}; sub bar {};$x = bar foo 7, 9"
sub foo { }
...
sub bar { }
$x = bar(foo(7), 9);
-e syntax OK