if ('meta' eq $e->[0]) {
if ('title' eq $e->[1]->{'name'}) {
$metadata->{'TITLE'} = $e->[1]->{'content'};
+ $metadata->{'TITLE'} =~ s/^Dailymotion\s*:\s*//;
}
}
}
# Look for the download URL
foreach $e (@text) {
if ($e->[0] =~ m|\.addVariable\("url", "([^\"]+)"|) {
- my $decoded = $1;
- $decoded =~ s/%(..)/chr(hex($1))/ge;
- $metadata->{'DLURL'} = $decoded;
+ $metadata->{'DLURL'} = $1;
+ $metadata->{'DLURL'} =~ s/%(..)/chr(hex($1))/ge;
+
}
}