| line |
true |
false |
branch |
|
30
|
0 |
3 |
$ENV{'DEBUG'} ? : |
|
42
|
0 |
75 |
if (exists $$self{'comics'}) |
|
43
|
0 |
0 |
if (ref $$self{'comics'} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $$self{'comics'} eq 'HASH') { } |
|
74
|
13 |
5 |
unless $param{'url'} =~ m[^https?://[a-z0-9\-\.]+.*]i |
|
84
|
5 |
0 |
if ($response->is_success) { } |
|
|
0 |
0 |
elsif ($^W) { } |
|
85
|
0 |
5 |
unless ($self->_image_format($response->content)) |
|
86
|
0 |
0 |
if $^W |
|
103
|
4 |
2 |
unless defined $blob |
|
105
|
1 |
1 |
if (not defined $param{'filename'} && length $param{'filename'} and defined $param{'url'}) |
|
112
|
0 |
2 |
unless open FH, ">$param{'filename'}" |
|
116
|
0 |
2 |
unless close FH |
|
130
|
7 |
0 |
if /^GIF8[79]a/ |
|
131
|
0 |
0 |
if /^\xFF\xD8/ |
|
132
|
0 |
0 |
if /^\x89PNG\x0d\x0a\x1a\x0a/ |