X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=videosite%2FSpikedHumorGrabber.pm;h=5d0f6aefe3ca836671db8f4b39b68a0ffc00eedf;hb=1cfec45c0c1cac8fdebca4313c3bcfb3a9f1ab07;hp=9925a3030664647bd9c3811403873173f55ad767;hpb=06718ca32510df74bbefe4e6428aa0d857ecb0ec;p=videosite.git diff --git a/videosite/SpikedHumorGrabber.pm b/videosite/SpikedHumorGrabber.pm index 9925a30..5d0f6ae 100644 --- a/videosite/SpikedHumorGrabber.pm +++ b/videosite/SpikedHumorGrabber.pm @@ -3,12 +3,11 @@ # # Grabber for spikedhumor.com -package SpikedHumorGrabber; +package videosite::SpikedHumorGrabber; -use GrabberBase; -@ISA = qw(GrabberBase); +use videosite::GrabberBase; +@ISA = qw(videosite::GrabberBase); -use LWP::Simple qw(!get); use XML::Simple; use Data::Dumper; @@ -47,7 +46,7 @@ sub _parse { $metadata->{'DLURL'} = undef; # Get the XML file containing the video metadata - unless(defined($content = LWP::Simple::get(sprintf('http://www.spikedhumor.com/playxml/%s/data.xml', $2)))) { + unless(defined($content = $self->simple_get(sprintf('http://www.spikedhumor.com/playxml/%s/data.xml', $2)))) { $self->error('Could not download XML metadata'); return undef; }