Help for this page

Select Code to Download


  1. or download this
    perl -le 'sub foo { 7,2,3 } $foo = foo(); print $foo'
    3
    
  2. or download this
    print not 1,0;
    print $/;
    __END__
    1