#!/usr/bin/perl

use strict;
use warnings;
use XML::SAX::ParserFactory;
use XML::LibXML::SAX;

$XML::SAX::ParserPackage = "XML::LibXML::SAX";
my $handler = XML::LibXML::SAX->new();
my $p = XML::SAX::ParserFactory->parser(Handler => $handler);
$p->parse_uri("http://junk.sixtease.net/train.m.xml");