Branch Coverage

blib/lib/DeltaX/Language.pm
Criterion Covered Total %
branch 21 44 47.7


line true false branch
26 0 3 unless defined $filename
28 0 3 if (@_ % 2) { }
36 0 3 if @_ % 2
53 0 3 unless (open INF, $self->{'filename'})
63 3 7 if (/^[ ]*#/) { }
65 1 2 if (/^!(.*)$/)
67 0 1 unless (defined $tmp)
69 0 1 if (exists $ret{$key})
79 3 4 unless $key
80 4 0 $val ? :
81 0 4 if (exists $ret{$key})
84 0 4 if ($val and $val =~ /^%/)
85 0 0 if (exists $ret{substr $val, 1})
130 1 0 if ($token =~ /^include/)
134 0 0 if ($token =~ /^separator/)
143 0 0 if ($2)
145 0 0 unless (exists $self->{'special'}{$1})
162 1 0 unless ($arg =~ m[^/])
163 1 0 if ($self->{'filename'} =~ m[^(.*)/[^/]*$])
164 0 1 if ($self->{'special'}{'include'}) { }
171 0 1 unless ($arg)
182 0 1 unless (defined $ret)