| XML-Elemental documentation | Contained in the XML-Elemental distribution. |
| XML-Elemental documentation | Contained in the XML-Elemental distribution. |
package XML::Elemental; use strict; use warnings; use vars qw($VERSION); $VERSION = '2.11'; use XML::SAX; sub parser { my $handler; if ($_[1] && ref($_[1]) ne 'HASH') { $handler = $_[1]; } else { require XML::Elemental::SAXHandler; $handler = XML::Elemental::SAXHandler->new($_[1]); } XML::SAX::ParserFactory->parser(Handler => $handler); } 1; __END__