|
/usr/local/perl/lib/site_perl/5.6.1/sun4-solaris/XML/Parser/Style/Subs.pm |
XML::Parser::Style::Subs
use XML::Parser;
my $p = XML::Parser->new(Style => 'Subs', Pkg => 'MySubs');
$p->parsefile('foo.xml');
{
package MySubs;
sub foo {
# start of foo tag
}
sub foo_ {
# end of foo tag
}
}
Each time an element starts, a sub by that name in the package specified by the Pkg option is called with the same parameters that the Start handler gets called with.
Each time an element ends, a sub with that name appended with an underscore (``_''), is called with the same parameters that the End handler gets called with.
Nothing special is returned by parse.
|
/usr/local/perl/lib/site_perl/5.6.1/sun4-solaris/XML/Parser/Style/Subs.pm |