| line |
true |
false |
branch |
|
34
|
1 |
69 |
unless my $impclass = implementor($scheme) |
|
48
|
2 |
73 |
if ($impclass) |
|
52
|
61 |
14 |
if $ic |
|
54
|
0 |
14 |
unless $scheme =~ /^([.+\-\w]+)$/ |
|
60
|
0 |
14 |
if $scheme eq 'news' |
|
63
|
13 |
1 |
unless (@{"${ic}::ISA";}) |
|
67
|
13 |
0 |
unless $class =~ /\.pm$/ |
|
72
|
2 |
0 |
if ($error =~ /Can't locate/) { } |
|
80
|
12 |
2 |
if $ic |
|
105
|
61 |
2 |
if (not defined $arg && $response->is_success) { } |
|
|
1 |
1 |
elsif (not ref $arg and length $arg) { } |
|
|
1 |
0 |
elsif (ref $arg eq 'CODE') { } |
|
109
|
0 |
1 |
unless open my $fh, '>', $arg |
|
113
|
0 |
1 |
unless print $fh $_[3] |
|
119
|
0 |
1 |
unless close $fh |
|
138
|
61 |
2 |
if (delete $response->{'default_add_content'}) |
|
154
|
0 |
54 |
if $skip_h{$h} |
|
155
|
8 |
46 |
unless ($h->{'callback'}->($response, $ua, $h, $$content)) |
|
161
|
15 |
31 |
$length ? : |
|
162
|
1 |
45 |
if (defined $max_size and $content_size > $max_size) |
|
175
|
62 |
1 |
unless %{$response->{'handlers'};} |
|
186
|
17 |
17 |
if $first-- |