Branch Coverage

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


line true false branch
26 0 1246 unless @_ == 1
29 3 1243 ref $self_or_class ? :
40 14 8207 if $raw_tag eq ""
43 4 8203 unless (defined $value)
66 16457 7642 if ($self->{'tags_by_name'}{$tagname})
76 0 5904 if ($tagname =~ /[;=\015\012\t ]/)
80 2666 3238 if (defined $value) { }
81 0 2666 if ($value =~ /;/)
84 0 2666 if ($value =~ /\015\012[^\t ]/)
88 362 2304 if ($self->{'tags_by_name'}{$tagname}) { }
105 0 3238 if ($self->{'tags_by_name'}{$tagname})
114 96 815 if ($Mail::DKIM::SORTTAGS)
131 120 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 '') { }