| line |
true |
false |
branch |
|
32
|
1 |
1 |
if @_ |
|
51
|
1 |
1 |
if ($CONF_ROOT and -d $CONF_ROOT) |
|
58
|
1 |
0 |
if (-s $local_conf) |
|
66
|
0 |
1 |
if (-s $class_conf) { } |
|
77
|
1 |
0 |
if (-s $class_conf) |
|
89
|
1 |
100 |
unless (exists $$hash{'__Rose::Conf::FileBased::IMPORTED'} or exists $$hash{'__Rose::Conf::FileBased::IMPORTING'}) |
|
92
|
0 |
1 |
if $Debug |
|
125
|
2 |
99 |
unless index($key, '__Rose::Conf::FileBased::') == 0 or exists $$hash{$key} |
|
135
|
0 |
0 |
if (not $CONF_ROOT and exists $ENV{'MOD_PERL'} and require mod_perl and $mod_perl::VERSION < 1.99) |
|
138
|
0 |
0 |
unless -d $CONF_ROOT |
|
148
|
0 |
0 |
if (@_) |
|
155
|
0 |
0 |
unless defined $timeout |
|
164
|
5 |
16 |
unless $line =~ /\S/ |
|
168
|
14 |
2 |
if ($line =~ /^((?:[^\\ \t]+|\\.)+)\s*=\s*(\S.*|$)/) { } |
|
|
0 |
2 |
elsif (not $line =~ /^(#|$)/) { } |
|
179
|
14 |
0 |
if (length $key and length $val) { } |
|
181
|
8 |
6 |
if ($val =~ s/(['"])(.*)\1$/$2/) |
|
183
|
1 |
7 |
if ($1 eq '"' and index($val, '\\') >= 0) |
|
187
|
0 |
1 |
if ($@) |
|
195
|
4 |
10 |
if ($key =~ /^(?:[^\\: \t]+|\\.)+:/) { } |
|
199
|
0 |
4 |
if ($key =~ /^(?:[^\\: \t]+|\\.)+:$/) |
|
217
|
0 |
4 |
if $Debug |
|
225
|
0 |
10 |
if $Debug |
|
232
|
0 |
0 |
if $Debug |
|
249
|
0 |
1 |
unless (open CONF, $file) |
|
276
|
0 |
1 |
unless (open $conf_fh, $file) |
|
296
|
1 |
16 |
if (/$in_domain_re/) { } |
|
|
0 |
20 |
elsif ($in_domain and /$out_domain_re/) { } |
|
306
|
4 |
12 |
unless $in_domain |
|
327
|
0 |
6 |
unless defined $key |
|
331
|
1 |
5 |
unless $$conf{'__Rose::Conf::FileBased::MODIFIED'}{$key} |
|
340
|
0 |
6 |
unless defined $key |
|
342
|
1 |
5 |
unless $class->local_conf_setting($key) |
|
344
|
2 |
3 |
if ($key =~ /^(?:[^\\: \t]+|\\.)+:/) |
|
346
|
0 |
2 |
if ($key =~ /^(?:[^\\: \t]+|\\.)+:$/) |
|
363
|
0 |
2 |
if $Debug |