.\" Automatically generated by Pod::Man 4.09 (Pod::Simple 3.35) .\" .\" Standard preamble: .\" ======================================================================== .de Sp \" Vertical space (when we can't use .PP) .if t .sp .5v .if n .sp .. .de Vb \" Begin verbatim text .ft CW .nf .ne \\$1 .. .de Ve \" End verbatim text .ft R .fi .. .\" Set up some character translations and predefined strings. \*(-- will .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left .\" double quote, and \*(R" will give a right double quote. \*(C+ will .\" give a nicer C++. Capital omega is used to do unbreakable dashes and .\" therefore won't be available. \*(C` and \*(C' expand to `' in nroff, .\" nothing in troff, for use with C<>. .tr \(*W- .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p' .ie n \{\ . ds -- \(*W- . ds PI pi . if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch . if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch . ds L" "" . ds R" "" . ds C` "" . ds C' "" 'br\} .el\{\ . ds -- \|\(em\| . ds PI \(*p . ds L" `` . ds R" '' . ds C` . ds C' 'br\} .\" .\" Escape single quotes in literal strings from groff's Unicode transform. .ie \n(.g .ds Aq \(aq .el .ds Aq ' .\" .\" If the F register is >0, we'll generate index entries on stderr for .\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index .\" entries marked with X<> in POD. Of course, you'll have to process the .\" output yourself in some meaningful fashion. .\" .\" Avoid warning from groff about undefined register 'F'. .de IX .. .if !\nF .nr F 0 .if \nF>0 \{\ . de IX . tm Index:\\$1\t\\n%\t"\\$2" .. . if !\nF==2 \{\ . nr % 0 . nr F 2 . \} .\} .\" ======================================================================== .\" .IX Title "XML::XPath::PerlSAX 3pm" .TH XML::XPath::PerlSAX 3pm "2018-10-20" "perl v5.26.2" "User Contributed Perl Documentation" .\" For nroff, turn off justification. Always turn off hyphenation; it makes .\" way too many mistakes in technical documents. .if n .ad l .nh .SH "NAME" XML::XPath::PerlSAX \- A PerlSAX event generator for my weird node structure .SH "SYNOPSIS" .IX Header "SYNOPSIS" .Vb 3 \& use XML::XPath; \& use XML::XPath::PerlSAX; \& use XML::DOM::PerlSAX; \& \& my $xp = XML::XPath\->new(filename => \*(Aqtest.xhtml\*(Aq); \& my $paras = $xp\->find(\*(Aq/html/body/p\*(Aq); \& \& my $handler = XML::DOM::PerlSAX\->new(); \& my $generator = XML::XPath::PerlSAX\->new( Handler => $handler ); \& \& foreach my $node ($paras\->get_nodelist) { \& my $domtree = $generator\->parse($node); \& # do something with $domtree \& } .Ve .SH "DESCRIPTION" .IX Header "DESCRIPTION" This module generates PerlSAX events to pass to a PerlSAX handler such as XML::DOM::PerlSAX. It operates specifically on my weird tree format. .PP Unfortunately \s-1SAX\s0 doesn't seem to cope with namespaces, so these are lost completely. I believe \s-1SAX2\s0 is doing namespaces. .SH "Other" .IX Header "Other" The XML::DOM::PerlSAX handler I tried was completely broken (didn't even compile before I patched it a bit), so I don't know how correct this is or how far it will work. .SH "LICENSE AND COPYRIGHT" .IX Header "LICENSE AND COPYRIGHT" This module is copyright 2000 AxKit.com Ltd. This is free software, and as such comes with \s-1NO WARRANTY.\s0 No dates are used in this module. You may distribute this module under the terms of either the Gnu \s-1GPL,\s0 or the Artistic License (the same terms as Perl itself).