Help for this page

Select Code to Download


  1. or download this
    # foo.pm
    package foo;
    ...
    }
    
    # etc...
    
  2. or download this
    use foo;
    my $frob = foo::new();
    ...
    
    print "FROB=", $frob->status(), "\n";
    print "NITZ=", $nitz->status(), "\n";