| lib/CGI/PathRequest.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 15 | 27 | 55.5 | 
| line | l | !l | condition | 
|---|---|---|---|
| 377 | 0 | 0 | warn $self->abs_path . 'is not a dir' and return {} | 
| line | !l | l&&!r | l&&r | condition | 
|---|---|---|---|---|
| 16 | 0 | 19 | 1 | defined $self and ref $self ne 'HASH' | 
| 665 | 5 | 0 | 0 | $wasfullurl and not $req | 
| line | l | !l | condition | 
|---|---|---|---|
| 20 | 20 | 0 | $self ||= {} | 
| 21 | 0 | 20 | $$self{'param_name'} ||= 'rel_path' | 
| 22 | 0 | 20 | $$self{'default'} ||= undef | 
| 24 | 14 | 6 | $$self{'rel_path'} ||= undef | 
| 25 | 0 | 20 | $$self{'excerpt_size'} ||= 255 | 
| 271 | 3 | 4 | $mime_type =~ /image/ || 0 | 
| 314 | 4 | 0 | $$guts{'content'} ||= undef | 
| 319 | 4 | 0 | $$self{'excerpt_size'} ||= 255 | 
| line | l | !l&&r | !l&&!r | condition | 
|---|---|---|---|---|
| 164 | 24 | 2 | 0 | $$self{'cgi'} ||= 'CGI'->new |