Help for this page
my $cb = MIS_PrintStatus->new(); my $callback = sub { $cb->printit(); }; # ... my $handler = MIS_SAX_Parser->new($callback);
# Here's what you have. sub new { ... bless $self, $class; }