Help for this page

Select Code to Download


  1. or download this
    my $a = 1;
    $a++ and print $a;
    
  2. or download this
    perl -MO=Deparse -e '$a++ and print $a'
    print $a if $a++;
    -e syntax OK