Branch Coverage

blib/lib/Mail/Message/Field/Structured.pm
Criterion Covered Total %
branch 22 26 84.6


line true false branch
30 0 112 if ref $attr eq "HASH"
34 0 0 if (ref $name) { }
49 72 235 if (ref $attr) { }
192 43 elsif (not @_) { }
83 79 1 if $string =~ s/^([^;(]+)//
91 5 142 if ($string =~ s/^\s*\;\s*// and length $found)
93 1 4 if ($name and my $cont = $self->attribute($name)) { }
106 146 1 if defined $text
108 0 147 if (length $string == $len)
114 70 8 if (length $found)
116 2 68 if ($name and my $cont = $self->attribute($name)) { }
135 47 2 defined $datum ? :
141 1 1 unless @_