Branch Coverage

blib/lib/DeltaX/Config.pm
Criterion Covered Total %
branch 33 60 55.0


line true false branch
30 0 4 if @_ % 2
33 12 0 if (exists $$self{$_[$x]}) { }
44 0 0 unless $self->{'filename'} or $self->{'db'}
46 0 4 if $self->{'db'} and not $self->{'app'}
58 4 0 if ($self->{'filename'})
61 0 0 if ($self->{'db'})
77 0 4 unless (open INF, $self->{'filename'})
88 2 17 if ($prev_line)
95 4 15 unless ($_)
97 4 11 if (/^[ ]*#/) { }
99 2 2 if (/^!(.*)$/)
101 0 2 unless defined $tmp
103 2 0 unless exists $ret{$key}
116 2 9 if (/\\$/)
124 0 9 unless defined $key
125 0 9 unless defined $val
130 0 9 if (length $key < 1)
132 9 0 if ($key =~ /^([-\w.]+)$/) { }
172 1 1 if ($token =~ /^include/)
176 1 0 if ($token =~ /^import/)
179 1 0 if ($tmp) { }
182 1 0 if rindex($key, '.') > 0
193 0 0 if ($2)
195 0 0 unless (exists $self->{'special'}{$1})
212 2 0 unless ($arg =~ m[^/])
213 2 0 if ($self->{'filename'} =~ m[^(.*)/[^/]*$])
214 0 2 if ($self->{'special'}{'include'}) { }
221 0 2 unless ($arg)
231 8 4 unless $s eq 'filename' or $s eq 'special' or $s eq 'error'
236 0 2 unless (defined $ret)