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} |