| line |
true |
false |
branch |
|
32
|
17 |
154 |
if exists $prms{'Method'} |
|
35
|
0 |
171 |
if exists $prms{'Query'} |
|
37
|
2 |
169 |
if exists $prms{'Identity'} |
|
38
|
5 |
166 |
if defined $prms{'Timestamp'} |
|
39
|
3 |
168 |
if defined $prms{'Expiration'} |
|
40
|
0 |
171 |
if defined $prms{'Tags'} |
|
41
|
15 |
156 |
if defined $prms{'Key'} |
|
48
|
0 |
886 |
unless @_ == 1 |
|
56
|
886 |
0 |
if ($string =~ s/^($prefix)//i) |
|
75
|
0 |
0 |
unless $self->headerlist |
|
79
|
0 |
0 |
if lc $attr eq lc $key |
|
90
|
943 |
2049 |
if (@_) |
|
95
|
2988 |
4 |
defined $a ? : |
|
116
|
0 |
421 |
unless @_ == 0 |
|
129
|
0 |
262 |
if @_ |
|
140
|
38 |
150 |
if @_ |
|
144
|
188 |
0 |
if (defined $result) |
|
154
|
38 |
513 |
if (@_) |
|
159
|
549 |
2 |
if defined $c |
|
160
|
4 |
547 |
unless ($c) |
|
164
|
149 |
402 |
unless (defined $c2) |
|
170
|
505 |
46 |
if (wantarray) { } |
|
189
|
3 |
421 |
unless grep {$_ eq $c1;} @known |
|
190
|
0 |
421 |
unless grep {$_ eq $c2;} @known |
|
205
|
429 |
5 |
unless defined $x |
|
222
|
829 |
3 |
if ($type eq "dns") |
|
223
|
816 |
13 |
if $options and $options eq "txt" |
|
226
|
12 |
1 |
unless ($v) |
|
227
|
12 |
0 |
unless defined $options |
|
243
|
54 |
381 |
if (my $version = $self->version) |
|
257
|
1448 |
948 |
if (@_) |
|
262
|
1366 |
1030 |
if defined $b |
|
275
|
217 |
0 |
if defined $res |
|
290
|
2 |
0 |
if defined $res |
|
301
|
1068 |
886 |
if (ref $class) |
|
302
|
0 |
1068 |
if @_ |
|
303
|
809 |
259 |
if $class->{'prefix'} |
|
312
|
942 |
2043 |
if (@_) |
|
317
|
2094 |
891 |
defined $d ? : |
|
324
|
3 |
419 |
if @_ |
|
344
|
0 |
892 |
unless @_ == 1 |
|
347
|
14 |
4 |
$algorithm eq 'ed25519-sha256' ? : |
|
|
786 |
18 |
$algorithm eq 'rsa-sha256' ? : |
|
|
88 |
804 |
$algorithm eq 'rsa-sha1' ? : |
|
363
|
0 |
424 |
if exists $self->{'public_key_query'} |
|
366
|
355 |
4 |
if ($_[0]) { } |
|
390
|
0 |
0 |
if ($self->{'public_key_query'}) |
|
406
|
0 |
715 |
unless (exists $self->{'public_key_query'}) |
|
410
|
370 |
345 |
if ($self->{'public_key_query'}) |
|
417
|
700 |
7 |
if (exists $self->{'public'}) { } |
|
431
|
3 |
0 |
$algorithm eq 'ed25519-sha256' ? : |
|
|
311 |
3 |
$algorithm eq 'rsa-sha256' ? : |
|
|
28 |
314 |
$algorithm eq 'rsa-sha1' ? : |
|
441
|
580 |
547 |
if @_ |
|
451
|
276 |
851 |
if (wantarray and $h) { } |
|
|
8 |
843 |
elsif (wantarray) { } |
|
468
|
2 |
300 |
if @_ |
|
472
|
217 |
85 |
if (defined $i) { } |
|
485
|
0 |
0 |
if ($id =~ /^\@/) |
|
499
|
53 |
0 |
if (@_) |
|
510
|
0 |
0 |
if (@_) |
|
521
|
0 |
834 |
if @_ |
|
525
|
85 |
749 |
if (defined $q) { } |
|
536
|
408 |
642 |
if @_ |
|
537
|
408 |
642 |
if @_ |
|
544
|
0 |
471 |
unless @_ == 0 |
|
546
|
147 |
280 |
if ($self->{'verify_result'} and $self->{'verify_details'}) |
|
556
|
965 |
851 |
if @_ |
|
592
|
406 |
0 |
if @_ |
|
602
|
171 |
1267 |
if @_ |