X-Git-Url: https://git.camperquake.de/gitweb.cgi?p=videosite.git;a=blobdiff_plain;f=videosite%2FBreakGrabber.pm;fp=videosite%2FBreakGrabber.pm;h=6bd77e1a5275c881e1e0d976157544737fda193d;hp=089607845f37a317d87833249ade00da24548ca7;hb=debab097d66f3bd735e837a146bc81d09e420961;hpb=9bb78db68a79470e45dd6400321e3dd96ffcb20b diff --git a/videosite/BreakGrabber.pm b/videosite/BreakGrabber.pm index 0896078..6bd77e1 100644 --- a/videosite/BreakGrabber.pm +++ b/videosite/BreakGrabber.pm @@ -15,16 +15,13 @@ use strict; sub new { my $class = shift; - my $self = $class->SUPER::new(); + my $self = $class->SUPER::new( + NAME => 'break', + PATTERNS => ['(http://(?:[-a-zA-Z0-9_.]+\.)*break.com/index/([-a-zA-Z0-9_]+?)\.html)'], + @_, + ); - $self->{'NAME'} = 'break'; - $self->{'PATTERNS'} = ['(http://(?:[-a-zA-Z0-9_.]+\.)*break.com/index/([-a-zA-Z0-9_]+?)\.html)']; - - bless($self, $class); - - $self->_prepare_parameters(); - - return $self; + return bless($self, $class); } sub _parse {