|  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)) { }  |