Branch Coverage

blib/lib/Config/Identity.pm
Criterion Covered Total %
branch 24 40 60.0


line true false branch
16 4 0 unless $ENV{'CI_GPG'}
22 0 3 unless $ENV{'CI_GPG_ARGUMENTS'}
29 0 3 unless my $gpg = GPG
49 4 2 unless defined $base
51 0 6 unless defined $stub and length $stub
56 6 3 if -f $path
67 0 5 unless -f $file
68 0 5 unless -r $file
72 0 5 unless open my $handle, $file
73 1 4 if $binary
76 0 5 unless close $handle
78 3 2 if ($binary or $content =~ /----BEGIN PGP MESSAGE----/)
80 0 3 if ($error)
81 0 0 'Error during decryption of content' . $binary ? :
94 0 5 unless $content
97 1 12 if /^\s*#/
98 2 10 unless /\S/
99 0 10 unless my($key, $value) = /^\s*(\w+)\s+(.+)$/
109 0 0 unless my $path = $self->best($stub)
117 0 4 unless my $path = $self->best($stub)