Help for this page

Select Code to Download


  1. or download this
    perl -n -MO=Deparse -e 'my $x' foo
    
  2. or download this
    LINE: while (defined($_ = <ARGV>)) {
        my $x;
    }
    -e syntax OK