+sub _decode_xml_entities {
+ my $str = shift;
+ # decoding entities can be extremely slow, so don't bother if it doesn't look like there are any
+ # entities to decode
+ return $str if $str !~ /&(?:#\d+)|[A-Za-z0-9]+;/;
+ return XML::Entities::decode('all', $str);
+}
+