Select Code to Download

my $handler = XML::SAX::PurePerl::DebugHandler->new();
my $parser = XML::SAX::PurePerl->new(Handler => $handler);
$parser->parse_uri("testfiles/xmltest.xml");