Help for this page

Select Code to Download


  1. or download this
    #!perl -l

package Pkg;
...
                       # error with strict

print $Pkg::var;       # 7
  2. or download this
    #!perl -l

package Pkg;
...
                       # error with strict

print $Pkg::var;       # undef; $Pkg::var has not been set
  3. or download this
    #!perl -l

package Pkg;
...
                       # error with strict

print $Pkg::var;       # 7
  4. or download this
    #!perl -l

package Pkg;
...
                       # in this lexical scope

print $Pkg::var;       # 7