blib/lib/Net/DNS/SEC/Private.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 14 | 14 | 100.0 |
line | true | false | branch |
---|---|---|---|
46 | 2 | 19 | scalar @_ > 2 ? : |
55 | 1 | 18 | unless $name =~ /^K([^+]+)\+(\d+)\+(\d+)\.private$/ |
59 | 1 | 17 | unless my $handle = "IO::File"->new($file, "<") |
65 | 1 | 162 | if /^$/ |
66 | 2 | 160 | if /^\s*[;]/ |
86 | 1 | 18 | unless $self->algorithm |
87 | 1 | 17 | unless $self->signame |