if ($e->[0] eq 'script') {
my $t = $p->get_text();
- if ($t =~ m|clip\d+_\d+ = (.*\});Player|) {
+ if ($t =~ m|clip\d+_\d+ = (.*\});Player|s) {
my $jsp = videosite::JSArrayParser->new();
my $r;
}
$metadata->{'TITLE'} = $r->{'config'}->{'video'}->{'title'};
+ $hd = grep { $_ eq 'hd' } @{$r->{'config'}->{'video'}->{'files'}->{'h264'}};
+ $self->debug("HD: %d", $hd);
$r = $r->{'config'}->{'request'};
- $metadata->{'DLURL'} = sprintf("http://%s/play_redirect?clip_id=%d&sig=%s&time=%d&quality=hd&codecs=H264,VP8,VP6",
+ $metadata->{'DLURL'} = sprintf("http://%s/play_redirect?clip_id=%d&sig=%s&time=%d&quality=%s&codecs=H264,VP8,VP6",
$r->{'player_url'},
$metadata->{'ID'},
$r->{'signature'},
$r->{'timestamp'},
+ $hd?'hd':'sd',
);
}
}