Branch Coverage

blib/lib/Mail/Message/Field/Structured.pm
Criterion Covered Total %
branch 20 24 83.3


line true false branch
36 0 158 if ref $attr eq "HASH"
40 0 0 if (ref $name) { }
54 77 243 if (ref $attr) { }
200 43 elsif (not @_) { }
87 98 7 if $string =~ s/^([^;(]+)//
95 5 152 if ($string =~ s/^\s*\;\s*// and length $found)
97 1 4 if ($name and my $cont = $self->attribute($name)) { }
110 156 1 if defined $text
112 0 157 if (length $string == $len)
118 75 18 if (length $found)
120 2 73 if ($name and my $cont = $self->attribute($name)) { }
144 1 1 unless @_