| line |
true |
false |
branch |
|
19
|
6 |
0 |
if ($#_ >= 0 and ref $_[0] eq 'HASH') { } |
|
|
0 |
0 |
elsif ($#_ >= 0 and $#_ % 2 == 1) { } |
|
32
|
4 |
2 |
if (defined $conf_file) { } |
|
33
|
1 |
3 |
if ($conf_file) |
|
36
|
1 |
0 |
if ($conf_file =~ /\.([^\.]+)$/) |
|
40
|
0 |
1 |
unless (-r $conf_file) |
|
55
|
0 |
2 |
if ($prog_dir =~ m[^([a-z]:)?/]i) { } |
|
62
|
0 |
2 |
unless $prog_dir |
|
77
|
2 |
0 |
if ($0 =~ /\.([a-z]+)$/i) |
|
80
|
0 |
2 |
if $ENV{'HOME'} and $app ne 'app' |
|
81
|
0 |
2 |
if $app ne 'app' and $conf_type ne $prog_suffix |
|
82
|
0 |
2 |
if $app ne 'app' |
|
83
|
2 |
0 |
if $ENV{'HOME'} |
|
84
|
2 |
0 |
if $conf_type ne $prog_suffix |
|
98
|
0 |
5 |
if $$options{'debug_conf'} |
|
99
|
3 |
2 |
if (open App::FILE, "< $conf_file") |
|
100
|
0 |
3 |
if $$options{'debug_conf'} |
|
110
|
0 |
0 |
$2 ? : |
|
|
0 |
0 |
defined $$options{$1} ? : |
|
114
|
3 |
0 |
unless ($serializer_class) |
|
115
|
3 |
0 |
if ($conf_type eq 'pl') { } |
|
|
0 |
0 |
elsif ($conf_type eq 'perl') { } |
|
|
0 |
0 |
elsif ($conf_type eq 'stor') { } |
|
|
0 |
0 |
elsif ($conf_type eq 'xml') { } |
|
|
0 |
0 |
elsif ($conf_type eq 'ini') { } |
|
|
0 |
0 |
elsif ($conf_type eq 'properties') { } |
|
|
0 |
0 |
elsif ($conf_type eq 'conf') { } |
|
|
0 |
0 |
elsif ($conf_type eq 'yaml') { } |
|
|
0 |
0 |
elsif ($conf_type) { } |
|
148
|
0 |
3 |
if ($serializer_class) { } |
|
150
|
0 |
0 |
if ($@) |
|
156
|
0 |
0 |
unless (%$conf) |
|
164
|
3 |
0 |
if ($text =~ /^[ \t\n]*\$[a-zA-Z][a-zA-Z0-9_]* *= *(\{.*\};[ \n]*)$/s) { } |
|
167
|
0 |
3 |
if ($@) |
|
182
|
3 |
3 |
if ($$options{'conf'} and ref $$options{'conf'} eq 'HASH') |