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