Branch Coverage

blib/lib/Config/Identity.pm
Criterion Covered Total %
branch 34 48 70.8


line true false branch
17 4 0 unless $ENV{'CI_GPG'}
23 0 3 unless $ENV{'CI_GPG_ARGUMENTS'}
30 0 3 unless my $gpg = &GPG()
50 10 2 unless defined $base
52 0 12 unless defined $stub and length $stub
57 12 9 if -f $path
68 0 11 unless -f $file
69 0 11 unless -r $file
73 0 11 unless open my $handle, $file
74 1 10 if $binary
77 0 11 unless close $handle
79 3 8 if ($binary or $content =~ /----BEGIN PGP MESSAGE----/)
81 0 3 if ($error)
82 0 0 'Error during decryption of content' . $binary ? :
95 0 11 unless $content
98 1 31 if /^\s*#/
99 2 29 unless /\S/
100 7 22 unless my($key, $value) = /^\s*(\w+)\s+(.+)$/
110 0 6 unless my $path = $self->best($stub)
118 0 4 unless my $path = $self->best($stub)
136 3 3 if (ref $required eq 'ARRAY') { }
2 1 elsif (ref $required eq 'CODE') { }
147 3 2 if (@missing)
148 1 2 @missing > 1 ? :