| line |
true |
false |
branch |
|
18
|
0 |
11 |
if (my $filename = delete $_{'filename'}) |
|
21
|
0 |
0 |
if (my $v = delete $_{$k}) |
|
29
|
0 |
11 |
if (my $lex = delete $_{'lexicon'}) { } |
|
33
|
55 |
11 |
if $_ ne 'Config::Parser' |
|
36
|
11 |
0 |
if (@cl) |
|
38
|
11 |
22 |
if (my($file, $line, $data) = $c->findsynt) |
|
40
|
11 |
0 |
if ($d) |
|
44
|
11 |
22 |
if $c eq $class |
|
47
|
11 |
0 |
if $dict |
|
51
|
0 |
11 |
if (@parseargs) |
|
53
|
0 |
0 |
unless $self->commit |
|
65
|
4 |
5 |
if $res |
|
74
|
0 |
33 |
unless $file = abs_path($INC{$file}) |
|
77
|
0 |
33 |
unless open FILE, $file |
|
80
|
11 |
22 |
if $data |
|
86
|
0 |
11 |
unless open my $fh, '<', \$data |
|
88
|
0 |
11 |
unless $self->parse($file, 'fh', $fh, 'line', $line) |
|
97
|
9 |
86 |
if $name eq 'ANY' |
|
98
|
39 |
56 |
if ($what eq 'section') { } |
|
107
|
38 |
18 |
if ($val eq 'STRING') { } |
|
|
6 |
12 |
elsif ($val eq 'NUMBER' or $val eq 'DECIMAL') { } |
|
|
3 |
9 |
elsif ($val eq 'OCTAL') { } |
|
|
0 |
9 |
elsif ($val eq 'HEX') { } |
|
|
6 |
3 |
elsif ($val =~ /^BOOL(EAN)?$/) { } |
|
126
|
9 |
47 |
if (@words) |
|
127
|
0 |
9 |
if ($ret->{'array'}) { } |
|
138
|
3 |
36 |
if (exists $s->{'section'}{'__options__'}) |
|
162
|
1 |
0 |
if (exists $bv{$$valref}) |