Help for this page

Select Code to Download


  1. or download this
    # Accessor_Factory.pm
    use strict;
    ...
      return;
    }
    __END__
    
  2. or download this
    # Foo.pm
    use strict;
    ...
      return bless +{}, shift;
    }
    __END__
    
  3. or download this
    # demo.pl
    use strict;
    ...
    print $foo->baz( 100 ), "\n";
    
    __END__
    
  4. or download this
    1
    3
    ...
    8
    88
    100