Branch Coverage

blib/lib/Mail/DKIM/Signature.pm
Criterion Covered Total %
branch 110 140 78.5


line true false branch
32 16 150 if exists $prms{'Method'}
35 0 166 if exists $prms{'Query'}
37 2 164 if exists $prms{'Identity'}
38 4 162 if defined $prms{'Timestamp'}
39 2 164 if defined $prms{'Expiration'}
40 0 166 if defined $prms{'Tags'}
41 14 152 if defined $prms{'Key'}
48 0 882 unless @_ == 1
56 882 0 if ($string =~ s/^($prefix)//i)
75 0 0 unless $self->headerlist
79 0 0 if lc $attr eq lc $key
90 938 2042 if (@_)
95 2976 4 defined $a ? :
116 0 419 unless @_ == 0
129 0 260 if @_
140 37 149 if @_
144 186 0 if (defined $result)
154 37 509 if (@_)
159 544 2 if defined $c
160 4 542 unless ($c)
164 144 402 unless (defined $c2)
170 501 45 if (wantarray) { }
189 3 419 unless grep {$_ eq $c1;} @known
190 0 419 unless grep {$_ eq $c2;} @known
200 429 3 unless defined $x
218 826 3 if ($type eq "dns")
219 813 13 if $options and $options eq "txt"
222 12 1 unless ($v)
223 12 0 unless defined $options
239 52 381 if (my $version = $self->version)
253 1440 945 if (@_)
258 1361 1024 if defined $b
271 217 0 if defined $res
286 2 0 if defined $res
297 1058 882 if (ref $class)
298 0 1058 if @_
299 806 252 if $class->{'prefix'}
308 937 2037 if (@_)
313 2087 887 defined $d ? :
320 2 417 if @_
340 0 888 unless @_ == 1
343 14 4 $algorithm eq 'ed25519-sha256' ? :
782 18 $algorithm eq 'rsa-sha256' ? :
88 800 $algorithm eq 'rsa-sha1' ? :
359 0 423 if exists $self->{'public_key_query'}
362 354 4 if ($_[0]) { }
386 0 0 if ($self->{'public_key_query'})
402 0 713 unless (exists $self->{'public_key_query'})
406 369 344 if ($self->{'public_key_query'})
413 698 7 if (exists $self->{'public'}) { }
427 3 0 $algorithm eq 'ed25519-sha256' ? :
310 3 $algorithm eq 'rsa-sha256' ? :
28 313 $algorithm eq 'rsa-sha1' ? :
437 575 543 if @_
447 274 844 if (wantarray and $h) { }
8 836 elsif (wantarray) { }
464 2 298 if @_
468 217 83 if (defined $i) { }
481 0 0 if ($id =~ /^\@/)
495 52 0 if (@_)
506 0 0 if (@_)
517 0 831 if @_
521 85 746 if (defined $q) { }
532 406 640 if @_
533 406 640 if @_
540 0 471 unless @_ == 0
542 147 280 if ($self->{'verify_result'} and $self->{'verify_details'})
552 960 849 if @_
588 405 0 if @_
598 166 1262 if @_