Branch Coverage

blib/lib/Net/SSH/AuthorizedKey/Base.pm
Criterion Covered Total %
branch 54 68 79.4


line true false branch
59 70 0 if (exists $VALID_OPTIONS{$key})
87 0 70 unless (defined $option_type)
92 57 13 if (defined $value)
94 45 12 if ($append) { }
95 3 42 if ($$self{'options'}{$key} and ref $$self{'options'}{$key} ne 'ARRAY')
103 35 22 if ($option_type eq 's') { }
104 5 30 if ($$self{'options'}{$key} and ref $$self{'options'}{$key} eq 'ARRAY') { }
118 25 45 if ("$option_type" eq '1')
147 46 30 if (defined $$self{'options'}{$option}) { }
148 10 36 if (ref $$self{'options'}{$option} eq 'ARRAY') { }
182 0 124 unless (length $string)
187 32 92 if (my $key = $class->key_read($string))
205 92 0 $rc ? :
210 18 74 if (my $key = $class->key_read($key_string))
232 47 1 if defined $_
238 17 28 unless defined $value
281 88 0 if (not defined *{"${package}::$name";})
282 0 88 unless eval $code
27 2 if (defined $value)
29 0 if (exists $$self{'encryption'}) { }
33 4 if (defined $value)
37 0 if (exists $$self{'key'}) { }
35 15 if (defined $value)
50 0 if (exists $$self{'error'}) { }
19 6 if (defined $value)
25 0 if (exists $$self{'comment'}) { }
14 42 if (defined $value)
56 0 if (exists $$self{'type'}) { }
23 11 if (defined $value)
34 0 if (exists $$self{'exponent'}) { }
32 10 if (defined $value)
42 0 if (exists $$self{'email'}) { }
34 19 if (defined $value)
53 0 if (exists $$self{'keylen'}) { }