sub new {
my $class = shift;
- my $self = $class->SUPER::new();
-
- $self = {%{$self},
+ my $self = $class->SUPER::new(
NAME => 'FlashGrab',
TYPE => 'grabber',
PATTERNS => [],
- };
+ @_,
+ );
return bless($self, $class);
}
}
}
if (defined($res)) {
- print Dumper($res);
- print Dumper($self->_cached_ua());
if (defined($self->_cached_ua())) {
$res->{COOKIES} = encode_base64("#LWP-Cookies-1.0\n" . $self->_cached_ua()->cookie_jar->as_string(), "");
}