| line |
true |
false |
branch |
|
112
|
1 |
15 |
unless ref $args eq 'HASH' |
|
114
|
1 |
14 |
unless exists $$args{'from'} |
|
116
|
2 |
12 |
unless defined $$args{'from'} and length $$args{'from'} |
|
121
|
1 |
11 |
unless -f $file |
|
122
|
1 |
10 |
if -s _ == 0 |
|
133
|
0 |
10 |
unless open $fh, '<', \$content |
|
138
|
10 |
0 |
defined $$args{'using'} ? : |
|
139
|
1 |
9 |
unless $backend->require |
|
141
|
0 |
9 |
unless my $self = __new_from($backend, $fh, \$content) |
|
156
|
0 |
9 |
if ($backend eq 'Config::IniFiles') { } |
|
|
0 |
9 |
elsif ($backend eq 'Config::Format::Ini') { } |
|
|
0 |
9 |
elsif ($backend eq 'Config::Simple') { } |
|
|
9 |
0 |
elsif ($backend eq 'Config::Tiny' or $backend eq 'Config::INI::Reader') { } |
|
188
|
19 |
2 |
if ($what eq 'file') { } |
|
|
2 |
0 |
elsif ($what eq 'dir') { } |
|
200
|
0 |
2 |
unless opendir my $dirh, $path |
|
205
|
4 |
6 |
if $skip{$file} or index($file, '.') == 0 |
|
209
|
6 |
0 |
if (-f $filepath) { } |
|
|
0 |
0 |
elsif (-d _) { } |