Branch Coverage

blib/lib/Config/App.pm
Criterion Covered Total %
branch 70 104 67.3


line true false branch
23 27 6 if ($config_location)
24 0 27 if "URI"->new($config_location)->scheme
25 0 0 -f $config_location ? :
0 27 if substr($config_location, 0, 1) eq "/"
37 32 43 if -f $test_path . '/' . $test_location
47 1 5 $ENV{'CONFIGAPPINIT'} ? :
27 6 $config_location ? :
60 32 1 length $root_dir && length $config_file ? :
67 10 0 unless grep {$_ eq $lib;} @INC
80 6 0 $locate_root_config[0] ? :
88 0 5 unless $config_file
90 5 0 if $root_dir
98 1 4 if $error
108 1 15 if not $no_singleton and $singleton
123 4 10 unless $no_singleton
125 1 13 if (my $libs = $self->get("libs"))
126 1 0 ref $libs eq 'ARRAY' ? :
138 0 0 if __PACKAGE__ eq ref $self
146 0 0 if $symbol =~ /\A[^:]+::\z/
165 0 0 if ($@)
205 0 1 $error ? :
218 52 2 if defined $_
219 15 12 unless $input->{'sources'}
227 1 26 unless $raw_config
230 15 11 if defined $root_dir and not exists $input->{'conf'}{'config_app'}{'root_dir'}
232 1 25 if (grep {$_ eq $include;} @{$$input{'conf'}{'config_app'}{'includes'};}) { }
260 3 45 if $set->{$include_type}
262 7 41 if $input->{'conf'}{$include_type}
263 0 48 if $set->{$optional}
265 2 46 if $input->{'conf'}{$optional}
300 0 27 if ('URI'->new($input->{'include'})->scheme) { }
309 0 0 if ($res->is_success) { }
317 0 0 unless $input->{'optional'}
322 26 1 if ($input->{'include'}) { }
325 0 1 unless $input->{'optional'}
330 0 26 unless open my $include_fh, "<", $input->{'include'}
344 19 6 if ($input->{'include'} =~ /\.yaml$/i or $input->{'include'} =~ /\.yml$/i) { }
6 0 elsif ($input->{'include'} =~ /\.json$/i or $input->{'include'} =~ /\.js$/i) { }
356 6 19 if ($type eq 'json') { }
374 1 24 if ($error)
379 1 0 unless $config
383 24 0 if $config
392 0 36 unless $source
394 33 0 if (not $is_deep_call and ref $merge eq "HASH" and ref $source eq "HASH")
395 3 30 if (my $libs = delete $source->{'libs'})
396 1 2 if (not exists $merge->{'libs'}) { }
1 1 elsif (ref $merge->{'libs'} eq 'ARRAY') { }
400 0 1 ref $libs eq 'ARRAY' ? :
404 1 0 ref $libs eq 'ARRAY' ? :
410 36 0 if (ref $merge eq 'HASH') { }
0 0 elsif (ref $merge eq 'ARRAY') { }
412 3 50 if (exists $merge->{$key} and ref $merge->{$key} eq 'HASH' and ref $source->{$key} eq 'HASH') { }