| line |
true |
false |
branch |
|
35
|
0 |
0 |
unless exists $$self{'images'} |
|
44
|
0 |
0 |
unless defined $document |
|
52
|
0 |
0 |
unless my $parser = 'HTML::TokeParser'->new(\$document) |
|
56
|
0 |
0 |
unless ref $token eq 'ARRAY' |
|
57
|
0 |
0 |
unless $$token[0] eq 'S' and $$token[1] eq 'img' |
|
58
|
0 |
0 |
unless $i++ >= $$self{'offset'} |
|
60
|
0 |
0 |
if @links >= $$self{'limit'} |
|
64
|
0 |
0 |
if (exists $$self{'prefix'}) { } |
|
82
|
0 |
0 |
if m[^//[^/]] |
|
88
|
0 |
0 |
unless m[^\w+://] |
|
94
|
0 |
0 |
unless my $tt = 'Template'->new('INCLUDE_PATH', 'SoggyOnion'->options->{'templatedir'}) |
|
98
|
0 |
0 |
unless $tt->process('imagescraper.tt2', {'links', \@links, 'src', $$self{'images'}, 'title', $title}, \$output) |