Condition Coverage

blib/lib/Apache/Admin/Config.pm
Criterion Covered Total %
condition 72 135 53.3


and 2 conditions

line l !l condition
1597 8 6196 defined $fh and $line = scalar <$fh>

and 3 conditions

line !l l&&!r l&&r condition
816 34 0 3 $where eq '-before' || $where eq '-after' and defined $target
818 0 0 3 ref $target and $target->isa('Apache::Admin::Config::Tree')
856 0 0 14 defined $name and defined $value
877 10 0 1 defined $value && $value
1210 0 0 9 ref $target and $target->isa('Apache::Admin::Config::Tree')
1237 0 0 0 defined $other && defined $$self{'value'}
12 0 0 $^W and not defined $other && defined $$self{'value'}
1246 0 0 0 defined $other && defined $$self{'value'}
3 0 0 $^W and not defined $other && defined $$self{'value'}
1255 0 0 0 defined $other && defined $$self{'value'}
3 0 0 $^W and not defined $other && defined $$self{'value'}
1264 0 0 0 defined $other && defined $$self{'value'}
3 0 0 $^W and not defined $other && defined $$self{'value'}
1391 0 3 0 $self->unlink && $self->destroy
1480 2038 28 9 defined $index and $index != -1
1538 0 10 4726 defined $group and $group
10 7 4719 defined $group and $group and defined $$tree{'children'}[$_index]
17 610 4109 defined $group and $group and defined $$tree{'children'}[$_index] and $$tree{'children'}[$_index]->type eq 'comment'
1568 0 0 644 defined $group and $group
0 7 637 defined $group and $group and defined $$tree{'children'}[$_index]
7 637 0 defined $group and $group and defined $$tree{'children'}[$_index] and $$tree{'children'}[$_index]->type eq 'blank'
1597 15 0 6189 defined $fh and $line = scalar <$fh> and defined $line
1603 4725 1464 7 not $line =~ /^\s*#/ and $line =~ s/\\$//
1674 28 12 702 defined $$args[$n] and not ref $$args[$n]
40 682 20 defined $$args[$n] and not ref $$args[$n] and $$args[$n] eq $name
1676 12 8 0 not $boolean and $n + 1 >= @$args
1707 4 0 0 not -f $htaccess and $$self{'create'}

or 2 conditions

line l !l condition
272 0 3 $$self{'raw'} || ''
0 3 $$self{'raw2'} || ''
317 0 0 $name || ''
386 0 32 _get_arg(\@_, '-type') || undef
387 0 32 _get_arg(\@_, '-name') || undef
388 3 29 _get_arg(\@_, '-value') || undef
525 0 51 $self->top->{'indent'} || 0
563 0 12 $self->_get_var('_write_directive') || \&default_write_directive
604 0 14 $self->_get_var('_write_section') || \&default_write_section
643 0 14 $self->_get_var('_write_section_closing') || \&default_write_section_closing
684 0 11 $self->_get_var('_write_comment') || \&default_write_comment
723 0 0 $self->_get_var('_write_blank') || \&default_write_blank
988 9 17 shift() || (return $$self{'value'})
1207 9 0 shift() || (return $self->_set_error('too few arguments'))
1221 3 0 $$parent{'parent'} || (return 0)
1453 133 40 $_[0]{'length'} || 0
1589 7 8 $$self{'htaccess'} || '[inline]'

or 3 conditions

line l !l&&r !l&&!r condition
141 0 15 0 ref $proto || $proto
236 0 15 0 ref $proto || $proto
816 0 3 34 $where eq '-before' || $where eq '-after'
826 28 0 0 $where eq '-onbottom' or $where eq ''
992 3 3 3 $type eq 'directive' or $type eq 'section'
1643 0 0 42 not @level or $section_name ne lc $level[-1]{'name'}