line |
true |
false |
branch |
41
|
23 |
0 |
if defined $self->agent and $self->agent eq $self->_agent |
50
|
4 |
26 |
if (not defined $response and &blessed($self)) |
56
|
2 |
4 |
if ($mapping->[0] eq $request_specification) |
63
|
2 |
2 |
unless $matched |
70
|
3 |
23 |
unless ($isa_response) |
72
|
2 |
1 |
if (&try(sub {
$response->can('request');
}
)) { } |
83
|
18 |
8 |
if (&blessed($self)) { } |
99
|
1 |
1 |
&blessed($self) ? : |
110
|
2 |
1 |
if (&blessed($self)) { } |
113
|
1 |
1 |
unless $instance_only |
117
|
0 |
1 |
if $instance_only |
128
|
0 |
0 |
unless defined $app |
130
|
0 |
0 |
unless __isa_coderef($app) |
140
|
0 |
0 |
if (&blessed($self)) { } |
144
|
0 |
0 |
unless $instance_only |
159
|
0 |
1 |
$last_useragent ? : |
|
28 |
1 |
&blessed($self) ? : |
169
|
0 |
1 |
$last_useragent ? : |
|
15 |
1 |
&blessed($self) ? : |
183
|
15 |
5 |
if (@_ == 1) |
187
|
12 |
3 |
&blessed($self) ? : |
190
|
3 |
2 |
if &blessed($self) |
205
|
0 |
57 |
if $matched_response |
206
|
0 |
57 |
unless defined $entry |
209
|
3 |
54 |
if ($request_desc->$Test::LWP::UserAgent::_isa('HTTP::Request')) { } |
|
25 |
29 |
elsif (__is_regexp($request_desc)) { } |
|
5 |
24 |
elsif (__isa_coderef($request_desc)) { } |
212
|
1 |
2 |
if freeze($request) eq freeze($request_desc) |
217
|
13 |
12 |
if $uri =~ /$request_desc/ |
222
|
2 |
3 |
if &$request_desc($request) |
227
|
0 |
24 |
unless $uri->$Test::LWP::UserAgent::_isa("URI") |
228
|
10 |
14 |
if $uri->host eq $request_desc |
236
|
8 |
12 |
if (not defined $matched_response and $self->{'__network_fallback'} || $network_fallback) |
244
|
22 |
12 |
defined $matched_response ? : |
248
|
11 |
23 |
if (__isa_coderef($response)) |
251
|
10 |
1 |
if ($self->use_eval) { } |
256
|
1 |
1 |
if ($exception->$Test::LWP::UserAgent::_isa('HTTP::Response')) { } |
265
|
0 |
1 |
$status =~ s/^(\d\d\d)\s+// ? : |
278
|
2 |
31 |
if (not $response->$Test::LWP::UserAgent::_isa('HTTP::Response')) { } |
297
|
8 |
33 |
if $complete |
317
|
0 |
0 |
unless "HTTP::Request"->can("to_psgi") and "HTTP::Response"->can("from_psgi") |
329
|
1 |
1 |
if &blessed($self) |
335
|
74 |
21 |
unless ref $_[0] eq "CODE" or (&reftype($_[0]) || '') eq "CODE" |
342
|
54 |
0 |
're'->can('is_regexp') ? : |
349
|
23 |
3 |
__isa_coderef($_[0]) || $_[0]->$Test::LWP::UserAgent::_isa('HTTP::Response') ? : |