NAME
Test::XML::SAX - Test XML::SAX handlers
SYNOPSIS
use Test::More tests => 1;
use Test::XML::SAX;
use My::XML::Filter;
my $handler = My::XML::Filter->new;
test_sax( $handler, '<foo />', '<bar/>', 'translates foo to bar' );
# ... In Another File ...
use Test::XML::SAX; use My::XML::Filter;
sub do_tests {
my $handler = My::XML::Filter->new;
test_sax( $handler, '<foo />', '<bar/>', 'translates foo to bar' );
}
test_all_sax_parsers( \&do_tests, 1 );
DESCRIPTION
This module is for testing XML::SAX handlers.
FUNCTIONS
All functions are exported by default.
- test_sax ( HANDLER, INPUT, EXPECTED [, TESTNAME ] )
-
This function will process INPUT using HANDLER, and compare the result with EXPECTED. TESTNAME can optionally be used to name the test in the output (a good idea).
- test_all_sax_parsers ( SUB [, NUMTESTS ] )
-
This function will repeat a set of tests for all installed SAX parsers. SUB must be a coderef to run a series of tests. NUMTESTS is the number of tests inside SUB.
NB: 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 NUMTESTS. This also means that you must not have any tests outside of SUB or you will get an error.
When SUB 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.
SEE ALSO
Test::More, Test::XML, XML::SAX.
AUTHOR
Dominic Mitchell, <cpan@semantico.com>
COPYRIGHT AND LICENSE
Copyright 2002 by semantico
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.