use LWP::UserAgent;
use HTTP::Cookies;
use HTML::TokeParser;
+use HTML::Entities qw(decode_entities);
+use Encode;
use Data::Dumper;
use videosite::JSArrayParser;
if ('meta' eq $tag->[0]) {
if ('title' eq $tag->[1]->{'name'}) {
$metadata->{'TITLE'} = $tag->[1]->{'content'};
+ # Convert HTML entities in the title. This is a bit convoluted.
+ $metadata->{'TITLE'} = encode("utf8",
+ decode_entities(
+ decode("utf8", $metadata->{'TITLE'})));
+
$self->debug('Title found: %s', $metadata->{'TITLE'});
}
} elsif ('script' eq $tag->[0]) {