| blib/lib/CGI/Ex/Conf.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 24 | 112 | 21.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 103 | 3 | 0 | 0 | exists $CACHE{$file} and not $args->{'no_cache'} |
| 188 | 1 | 0 | 0 | exists $CACHE{$path} and not $CACHE{$path} |
| 334 | 0 | 0 | 0 | $key and $key =~ /^\w+$/ |
| 370 | 0 | 0 | 0 | $str and $#order != -1 |
| 0 | 0 | 0 | $str and $#order != -1 and $key eq "validation" | |
| 398 | 2 | 0 | 0 | exists $CACHE{$file} and not $args->{'no_cache'} |
| 478 | 0 | 0 | 0 | exists $CACHE{$path} and not $CACHE{$path} |
| 498 | 0 | 0 | 0 | UNIVERSAL::isa($conf, "HASH") and $conf->{'Immutable Keys'} |
| line | l | !l | condition |
|---|---|---|---|
| 84 | 4 | 0 | shift() || __PACKAGE__ |
| 85 | 3 | 1 | shift() || {} |
| 92 | 1 | 0 | $self->{'paths'} ||= \@DEFAULT_PATHS |
| 99 | 4 | 0 | shift() || {} |
| 144 | 2 | 0 | eval { do { scalar &$handler($file, $args) } } || die("Error while reading conf file $file\n$@") |
| 150 | 1 | 0 | shift() || {} |
| 160 | 1 | 0 | shift() || {} |
| 161 | 0 | 1 | $args->{'ref'} || undef |
| 162 | 0 | 1 | $args->{'immutable'} || {} |
| 200 | 0 | 1 | $self->read_ref($path, $args) || (next) |
| 332 | 0 | 0 | shift() || {} |
| 395 | 2 | 0 | shift() || {} |
| 431 | 2 | 0 | eval { do { scalar &$handler($file, $conf, $args) } } || die("Error while writing conf file $file\n$@") |
| 438 | 0 | 0 | shift() || {} |
| 449 | 0 | 0 | shift() || {} |
| 450 | 0 | 0 | $args->{'immutable'} || {} |
| 644 | 0 | 0 | exists $CACHE{$file} || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 135 | 3 | 0 | 0 | $EXT_READERS{$ext} || croak("Unknown file extension: $ext") |
| 140 | 1 | 0 | 0 | $args->{'no_warn_on_fail'} or $NO_WARN_ON_FAIL |
| 169 | 0 | 0 | 1 | ref $namespace or index($namespace, "\n") != -1 |
| 0 | 0 | 1 | ref $namespace or index($namespace, "\n") != -1 or $namespace =~ m[^\.{0,2}/.+$] | |
| 178 | 1 | 0 | 0 | $args->{'directive'} || $self->{'directive'} || $DIRECTIVE |
| 180 | 1 | 0 | 0 | $args->{'paths'} || $self->paths || croak("No paths found during read on $namespace") |
| 227 | 0 | 0 | 0 | $immute or $immutable |
| 235 | 0 | 0 | 0 | $immute or $immutable |
| 333 | 0 | 0 | 0 | $args->{'html_key'} || $HTML_KEY |
| 394 | 2 | 0 | 0 | shift() || croak('Missing conf') |
| 428 | 2 | 0 | 0 | $EXT_WRITERS{$ext} || croak("Unknown file extension: $ext") |
| 448 | 0 | 0 | 0 | shift() || croak('Must pass hashref to write out') |
| 457 | 0 | 0 | 0 | ref $namespace or $namespace =~ m[^\.{0,2}/.+$] |
| 468 | 0 | 0 | 0 | $args->{'directive'} || $self->{'directive'} || $DIRECTIVE |
| 470 | 0 | 0 | 0 | $args->{'paths'} || $self->paths || croak("No paths found during write on $namespace") |
| 489 | 0 | 0 | 0 | $directive eq "LAST" or $directive eq "MERGE" |
| 600 | 0 | 0 | 0 | shift() || $self->paths |
| 610 | 0 | 0 | 0 | $self->{'html_key'} or $HTML_KEY |