diff --git a/ext/Pod-Html/lib/Pod/Html.pm b/ext/Pod-Html/lib/Pod/Html.pm
index 329c2493a5ee..a9b0d5e77c3f 100644
--- a/ext/Pod-Html/lib/Pod/Html.pm
+++ b/ext/Pod-Html/lib/Pod/Html.pm
@@ -558,6 +558,7 @@ sub set_Title_from_podtree {
     }
 
     $self->{Title} //= "";
+    $self->{Title} = html_escape($self->{Title});
     return $self;
 }