| line |
true |
false |
branch |
|
46
|
3 |
6 |
unless $ref1 |
|
48
|
1 |
5 |
if $ref1 eq "Net::DNS::Packet" |
|
50
|
2 |
3 |
unless ref $arg2 |
|
133
|
7 |
2 |
scalar $keyset->verify ? : |
|
209
|
1 |
1 |
if $self->verify |
|
263
|
1 |
15 |
if scalar @names > 1 |
|
266
|
2 |
14 |
if ($keyid) { } |
|
|
12 |
2 |
elsif (my(@sepkeys) = grep({$_->sep;} @keys)) { } |
|
268
|
1 |
1 |
unless @sigs |
|
272
|
1 |
11 |
unless grep {$sepkey{$_->keytag};} @sigs |
|
277
|
21 |
3 |
if $sig->verify(\@keys, $keysbytag{$keytag} || []) |
|
285
|
12 |
4 |
unless $keyset_err |
|
350
|
1 |
2 |
if $arg1 and "File::Spec"->file_name_is_absolute($arg1) |
|
358
|
1 |
2 |
unless my $handle = "IO::File"->new($filename, ">") |