Help for this page

Select Code to Download


  1. or download this
    # file Foo.pm
    use strict;
    ...
    sub foo {
     return $bee++;
    }
    
  2. or download this
    # some other file Bar.pm
    use strict;
    ...
    sub bar {
      return $bee;
    }
    
  3. or download this
    # file Foo.pm
    package Foo;
    our $blah = 2; # or use vars
    
  4. or download this
    #file Bar.pm
    package Bar;
    print $Foo::blah;