Select Code to Download

use XML::LibXML;

...
    recover => 1,  # handle marginal HTML
);
print $dom->toString;