X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=videosite%2FGoogleGrabber.pm;h=49156035ed46ce0dbd80e754a942e55c94ed4338;hb=d4fae22c083e110d1c788a78196f85d1e39b116e;hp=442a872c1217531d8055913a8e6eadc9dedac4b6;hpb=459af70cec834289606d6856346a661178a7866d;p=videosite.git diff --git a/videosite/GoogleGrabber.pm b/videosite/GoogleGrabber.pm index 442a872..4915603 100644 --- a/videosite/GoogleGrabber.pm +++ b/videosite/GoogleGrabber.pm @@ -3,12 +3,11 @@ # # Grabber for video.google.com -package GoogleGrabber; +package videosite::GoogleGrabber; -use GrabberBase; -@ISA = qw(GrabberBase); +use videosite::GrabberBase; +@ISA = qw(videosite::GrabberBase); -use LWP::Simple qw(!get); use HTML::TokeParser; use Data::Dumper; @@ -36,7 +35,7 @@ sub _parse { my $metadata = {}; my $p; my $e; - my $qualty = $self->_getval('QUALITY'); + my $quality = $self->_getval('QUALITY'); $url =~ m|$pattern|; $url = $1; @@ -48,7 +47,7 @@ sub _parse { $metadata->{'TITLE'} = undef; $metadata->{'DLURL'} = undef; - unless(defined($content = LWP::Simple::get(sprintf('http://video.google.com/videohosted?docid=%s', $2)))) { + unless(defined($content = $self->simple_get(sprintf('http://video.google.com/videohosted?docid=%s', $2)))) { $self->error('Could not download %s', $url); return undef; }