Branch Coverage

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


line true false branch
30 0 105 if ref $attr eq 'HASH'
34 0 0 if (ref $name) { }
49 67 218 if (ref $attr) { }
178 40 elsif (not @_) { }
80 74 1 if $string =~ s/^([^;(]+)//
88 5 132 if ($string =~ s/^\s*\;\s*// and length $found)
90 1 4 if ($name and my $cont = $self->attribute($name)) { }
103 136 1 if defined $text
105 0 137 if (length $string == $len)
111 65 8 if (length $found)
113 2 63 if ($name and my $cont = $self->attribute($name)) { }
132 44 2 defined $datum ? :
138 1 1 unless @_