line |
true |
false |
branch |
160
|
3 |
12 |
if ref $class |
165
|
6 |
9 |
unless (exists $$args{'request_interface'}) |
170
|
1 |
14 |
unless (UNIVERSAL::can($request, 'http')) |
174
|
1 |
13 |
unless (UNIVERSAL::can($request, 'param')) |
178
|
1 |
12 |
unless (UNIVERSAL::can($request, 'header')) |
209
|
0 |
12 |
if (-f $INC{'XML/Dumper.pm'}) |
216
|
9 |
3 |
if (-f $INC{'JSON.pm'}) |
223
|
9 |
3 |
if (-f $INC{'REST/RequestFast.pm'}) |
285
|
5 |
1 |
if (-f $INC{'REST/RequestFast.pm'}) { } |
289
|
4 |
1 |
if $html |
290
|
1 |
4 |
if $ttl |
298
|
1 |
0 |
if ($status == 200) { } |
301
|
0 |
1 |
if ($html) { } |
315
|
0 |
1 |
if (time - $$this{'starttime'} > $$this{'ttl'}) |
353
|
0 |
0 |
unless $req |
357
|
0 |
0 |
if ($status == 200 and defined $method) { } |
411
|
9 |
93 |
unless $description |
413
|
93 |
9 |
if (defined $implementation) |
448
|
32 |
10 |
if exists $$this{'mimetype_mapping'}{$format} |
451
|
5 |
37 |
unless $description |
453
|
8 |
34 |
if exists $$this{'formats'}{$format} |
454
|
37 |
5 |
if (defined $implementation) |
498
|
29 |
1 |
if (defined $$this{'descriptions'}{$name}) |
535
|
2 |
1 |
$req->http('SERVER_PORT') == 443 ? : |
539
|
2 |
1 |
defined $req->http('SCRIPT_NAME') ? : |
856
|
2 |
10 |
if (defined $format) { } |
|
10 |
0 |
elsif (defined $explicit) { } |
868
|
6 |
4 |
if (defined $useragent and $useragent =~ /Gecko/i) |
871
|
1 |
5 |
if $$mimetypes{'text/html'} and $$mimetypes{'application/xml'} |
876
|
8 |
11 |
if exists $$this{'formats'}{$format} |
878
|
1 |
0 |
if (defined $useragent and $useragent =~ /MSIE/) |
885
|
0 |
0 |
if (defined %XML::Dumper::) |
952
|
1 |
0 |
if defined $status |
953
|
1 |
0 |
if defined $status_msg |
954
|
1 |
0 |
if (&is_error($status)) { } |