A trivial perlsax handler
use XML::Parser::PerlSAX; use XML::Handler::Sample; $my_handler = XML::Handler::Sample->new; XML::Parser::PerlSAX->new->parse(Source => { SystemId => 'REC-xml-19980210.xml' }, Handler => $my_handler);
\*(C`XML::Handler::Sample\*(C' is a trivial PerlSAX handler that prints out the name of each event it receives. The source for \*(C`XML::Handler::Sample\*(C' lists all the currently known PerlSAX handler methods.
\*(C`XML::Handler::Sample\*(C' is intended for Perl module authors who wish to look at example PerlSAX handler modules. \*(C`XML::Handler::Sample\*(C' can be used as a template for writing your own PerlSAX handler modules. \*(C`XML::Handler::Sample\*(C' is in the Public Domain and can be used for any purpose without restriction.
Ken MacLeod, [email protected]
perl\|(1), PerlSAX.pod\|(3)