use HTML::HTML5::Parser;

my $user_agent;
$user_agent = LWP::UserAgent->new;
$user_agent("HTML::HTML5::Parser/".'0.110'." ");
$user_agent->parse_head(0);

my $parser = HTML::HTML5::Parser->new;
my $xml = $parser->parse_html_file($URL, {
	ignore_http_response_code => 1,
	user_agent => $user_agent,
    }
);

my $nodes = $xml->findnodes('//*[local-name()="title"]');
say $nodes->get_node(1)->textContent;