XML::LibXML 

my $parser = XML::LibXML->new();

my $doc    = $parser->parse_fh($filename);