Branch Coverage

blib/lib/Crypt/RSA/Key/Public.pm
Criterion Covered Total %
branch 20 26 76.9


line true false branch
23 1 20 if ($params{'Filename'}) { }
37 2058 25 if ($key =~ /^n|e$/) { }
25 0 elsif ($key =~ /^Identity$/) { }
38 42 2016 if (defined $value)
39 31 11 if (ref $value eq 'Math::BigInt') { }
0 11 elsif (ref $value eq 'Math::Pari') { }
47 2057 1 if (defined $self->{$key})
48 4 2053 unless ref $self->{$key} eq 'Math::BigInt'
53 13 12 if $value
70 0 552 unless defined $self->n and defined $self->e
82 0 1 unless open my $disk, '>', $params{'Filename'}
93 0 1 unless open my $disk, '<', $params{'Filename'}
108 4 0 if ref $self->{$key} eq 'Math::BigInt'