line |
true |
false |
branch |
61
|
0 |
0 |
if defined $verb |
102
|
0 |
46 |
unless ref $response |
103
|
0 |
46 |
unless $response->code =~ /[1-9][0-9]+/ |
106
|
3 |
43 |
if (robot_lockout($response)) |
107
|
0 |
3 |
if $main::verbose |
112
|
14 |
29 |
if (unsupported($response)) |
113
|
0 |
14 |
if $main::verbose |
118
|
17 |
12 |
if ($response->is_error) |
119
|
0 |
17 |
if $main::verbose |
124
|
12 |
0 |
if ($response->is_success) |
125
|
0 |
12 |
if $main::verbose |
133
|
0 |
0 |
if $response->is_redirect |
137
|
6 |
40 |
@redirects ? : |
138
|
6 |
40 |
if @redirects |
147
|
43 |
3 |
unless $response->code == 403 |
150
|
1 |
2 |
unless defined $message |
151
|
2 |
0 |
if $message =~ /robots\.txt/ |
157
|
14 |
29 |
if $response->code == 498 |
162
|
0 |
29 |
if $response->code == 400 and $response->message =~ /Library does not allow method/ |