use strict; use warnings; use XML::LibXML qw( ); my $parser = XML::LibXML->new( load_ext_dtd => 0, ); my $xhtml = <<'__EOI__'; Test   __EOI__ $parser->parse_string($xhtml);