Branch Coverage

lib/Getopt/FileConfig.pm
Criterion Covered Total %
branch 25 54 46.3


line true false branch
28 2 0 if (defined $$S{-'defcfg'}) { }
30 2 0 unless ref $$S{-'defcfg'} eq 'ARRAY'
37 0 2 if (defined $$S{-'cfgbase'}) { }
73 0 2 unless defined $aref
76 0 2 if ($#{$aref;} > 0 and $$aref[0] eq '-cfg') { }
79 0 0 unless -r $$S{'Config'}
86 2 0 if (-r $c)
92 0 2 unless defined $$S{'Config'}
99 0 2 if $$S{-'verbose'}
100 0 2 if $$S{-'useenv'} and $$S{-'verbose'}
106 10 8 if /^#/ or /^\s/
111 0 8 if ($$S{-'useenv'} and defined $ENV{$var})
115 4 4 if ($$S{-'hash'}) { }
117 3 1 if ($context eq 'main' or $context eq '.') { }
120 2 1 ref $$S{-'hash'}{$var} ? :
126 1 0 ref $$S{-'hash'}{$context}{$var} ? :
135 3 1 if $context eq '.'
138 3 1 ref ${$symref;} ? :
143 8 0 if ($type ne 'x' and $type ne 'exclude')
145 0 8 if $type eq 'b' or $type eq 'bool'
152 0 0 if ($$S{-'hash'}) { }
175 0 0 if ($inm and $a[$n] =~ /$inm$/) { }
0 0 elsif (not $inm and $a[$n] =~ /^([\'\"])/) { }
206 0 0 unless ref $h eq 'HASH'
210 0 0 if ($$d{$k} eq '')
212 0 0 unless exists $$h{$k}
215 0 0 unless exists $$h{$k}