| blib/lib/CGI/SHTML.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 1 | 43 | 2.3 |
| line | l | !l | condition |
|---|---|---|---|
| 321 | 0 | 0 | "Couldn't open ${file}: $!\n" && (return '') |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 136 | 0 | 0 | 0 | defined $text and $text ne '' |
| 138 | 0 | 0 | 0 | scalar @parts and $parts[0] =~ /^\s*$/m |
| 143 | 0 | 0 | 0 | defined $ssival and $ssival ne '' |
| 341 | 0 | 0 | 0 | scalar @list > 1 and $list[0] =~ /^Content-type: (.*)$/i |
| line | l | !l | condition |
|---|---|---|---|
| 134 | 0 | 0 | shift @parts || '' |
| 219 | 0 | 0 | $hash{'var'} || (return 'No variable to set') |
| 220 | 0 | 0 | $hash{'value'} || '' |
| 256 | 0 | 0 | $type ||= 'default' |
| 276 | 0 | 0 | $type ||= 'default' |
| 296 | 0 | 0 | shift() || (return undef) |
| 299 | 0 | 0 | $ENV{$1} || '' |
| 350 | 1 | 0 | (stat $_[1])[9] || 0 |
| 352 | 0 | 0 | (stat $_[1])[7] || 0 |
| 373 | 0 | 0 | $ENV{$1 or $2} || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 191 | 0 | 0 | 0 | lc $command eq 'if' or lc $command eq 'elif' |
| 228 | 0 | 0 | 0 | $ENV{$hash{'var'}} || $CGI::SHTML::EMPTY |
| 301 | 0 | 0 | 0 | $ENV{'HTTP_HOST'} || $ENV{'HOSTNAME'} |