Condition Coverage

blib/lib/CGI/Ex/Conf.pm
Criterion Covered Total %
condition 24 112 21.4


and 3 conditions

line !l l&&!r l&&r condition
103 2 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 1 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'}

or 2 conditions

line l !l condition
84 4 0 shift() || 'CGI::Ex::Conf'
85 3 1 shift() || {}
92 1 0 $self->{'paths'} ||= \@DEFAULT_PATHS
99 3 0 shift() || {}
144 1 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 1 0 shift() || {}
431 1 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

or 3 conditions

line l !l&&r !l&&!r condition
135 2 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 1 0 0 shift() || croak('Missing conf')
428 1 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