.\" Automatically generated by Pod::Man 4.14 (Pod::Simple 3.42)
.\"
.\" 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
..
.nr rF 0
.if \n(.g .if rF .nr rF 1
.if (\n(rF:(\n(.g==0)) \{\
. if \nF \{\
. de IX
. tm Index:\\$1\t\\n%\t"\\$2"
..
. if !\nF==2 \{\
. nr % 0
. nr F 2
. \}
. \}
.\}
.rr rF
.\"
.\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
.\" Fear. Run. Save yourself. No user-serviceable parts.
. \" fudge factors for nroff and troff
.if n \{\
. ds #H 0
. ds #V .8m
. ds #F .3m
. ds #[ \f1
. ds #] \fP
.\}
.if t \{\
. ds #H ((1u-(\\\\n(.fu%2u))*.13m)
. ds #V .6m
. ds #F 0
. ds #[ \&
. ds #] \&
.\}
. \" simple accents for nroff and troff
.if n \{\
. ds ' \&
. ds ` \&
. ds ^ \&
. ds , \&
. ds ~ ~
. ds /
.\}
.if t \{\
. ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
. ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
. ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
. ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
. ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
. ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
.\}
. \" troff and (daisy-wheel) nroff accents
.ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
.ds 8 \h'\*(#H'\(*b\h'-\*(#H'
.ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
.ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
.ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
.ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
.ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
.ds ae a\h'-(\w'a'u*4/10)'e
.ds Ae A\h'-(\w'A'u*4/10)'E
. \" corrections for vroff
.if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
.if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
. \" for low resolution devices (crt and lpr)
.if \n(.H>23 .if \n(.V>19 \
\{\
. ds : e
. ds 8 ss
. ds o a
. ds d- d\h'-1'\(ga
. ds D- D\h'-1'\(hy
. ds th \o'bp'
. ds Th \o'LP'
. ds ae ae
. ds Ae AE
.\}
.rm #[ #] #H #V #F C
.\" ========================================================================
.\"
.IX Title "Test::XML::SAX 3pm"
.TH Test::XML::SAX 3pm "2022-06-18" "perl v5.34.0" "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"
Test::XML::SAX \- Test XML::SAX handlers
.SH "SYNOPSIS"
.IX Header "SYNOPSIS"
.Vb 2
\& use Test::XML::SAX tests => 1;
\& use My::XML::Filter;
\&
\& my $handler = My::XML::Filter\->new;
\& test_sax( $handler, \*(Aq\*(Aq, \*(Aq\*(Aq, \*(Aqtranslates foo to bar\*(Aq );
\&
\& # ... In Another File ...
\&
\& use Test::XML::SAX; use My::XML::Filter;
\&
\& sub do_tests {
\& my $handler = My::XML::Filter\->new;
\& test_sax( $handler, \*(Aq\*(Aq, \*(Aq\*(Aq, \*(Aqtranslates foo to bar\*(Aq );
\& }
\&
\& test_all_sax_parsers( \e&do_tests, 1 );
.Ve
.SH "DESCRIPTION"
.IX Header "DESCRIPTION"
This module is for testing \s-1XML::SAX\s0 handlers.
.SH "FUNCTIONS"
.IX Header "FUNCTIONS"
All functions are exported.
.IP "test_sax ( \s-1HANDLER, INPUT, EXPECTED\s0 [, \s-1TESTNAME\s0 ] )" 4
.IX Item "test_sax ( HANDLER, INPUT, EXPECTED [, TESTNAME ] )"
This function will process \s-1INPUT\s0 using \s-1HANDLER,\s0 and compare the result
with \s-1EXPECTED.\s0 \s-1TESTNAME\s0 can optionally be used to name the test in the
output (a good idea).
.IP "test_all_sax_parsers ( \s-1SUB\s0 [, \s-1NUMTESTS\s0 ] )" 4
.IX Item "test_all_sax_parsers ( SUB [, NUMTESTS ] )"
This function will repeat a set of tests for all installed \s-1SAX\s0 parsers.
\&\s-1SUB\s0 must be a coderef to run a series of tests. \s-1NUMTESTS\s0 is the number
of tests inside \s-1SUB.\s0
.Sp
\&\fB\s-1NB\s0\fR: You must not issue a plan to Test::More if you call this
function! The plan will be set for you, according to the number of
parsers installed and \s-1NUMTESTS.\s0 This also means that you must not have
any tests outside of \s-1SUB\s0 or you will get an error.
.Sp
When \s-1SUB\s0 is called, it will be passed two arguments. The name of the
parser being used and the number of tests. It can use this information
to decide whether or not to skip this set of tests.
.SH "SEE ALSO"
.IX Header "SEE ALSO"
Test::More, Test::XML, \s-1XML::SAX\s0.
.SH "AUTHOR"
.IX Header "AUTHOR"
Dominic Mitchell,
.SH "COPYRIGHT AND LICENSE"
.IX Header "COPYRIGHT AND LICENSE"
Copyright 2002 by semantico
.PP
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.