Branch Coverage

blib/lib/Mail/DKIM/KeyValueList.pm
Criterion Covered Total %
branch 31 36 86.1


line true false branch
26 0 1265 unless @_ == 1
29 3 1262 ref $self_or_class ? :
40 26 8342 if $raw_tag eq ""
43 5 8337 unless (defined $value)
66 17696 7826 if ($self->{'tags_by_name'}{$tagname})
76 0 6014 if ($tagname =~ /[;=\015\012\t ]/)
80 2718 3296 if (defined $value) { }
81 0 2718 if ($value =~ /;/)
84 0 2718 if ($value =~ /\015\012[^\t ]/)
88 368 2350 if ($self->{'tags_by_name'}{$tagname}) { }
105 0 3296 if ($self->{'tags_by_name'}{$tagname})
114 96 835 if ($Mail::DKIM::SORTTAGS)
131 124 3 unless UNIVERSAL::can($TEXTWRAP_CLASS, "new")
147 17 3 $did_first ? :
150 6 14 unless ($args{'PreserveNames'})
157 3 17 if ($tagtype eq 'b64') { }
1 16 elsif ($tagtype eq 'list') { }
4 12 elsif ($tagtype eq '') { }