Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
    print $main::var, "\n";    # prints 2
}
print $main::var, "\n";        # also prints 2
  2. or download this
    use strict;
use warnings;
...
    print $var, "\n";    # prints 2
}
print $main::var, "\n";        # also prints 2
  3. or download this
    use strict;
use warnings;
...
    print $var, "\n";    # prints 2
}
print $var, "\n";        # also prints 2
  4. or download this
    use strict;
use warnings;
...
    print $var, "\n";    # prints 2
}
print $var, "\n";        # also prints 2