Branch Coverage

blib/lib/Data/Text.pm
Criterion Covered Total %
branch 36 38 94.7


line true false branch
53 1 22 if (not defined $class) { }
1 21 elsif (ref $class) { }
68 6 16 if (scalar @_)
91 0 10 if (ref $_[0] eq 'HASH') { }
3 7 elsif (scalar(@_) % 2 == 0) { }
99 1 9 unless (defined $params{'text'})
104 3 6 if (ref $params{'text'}) { }
106 1 2 if (ref $params{'text'} eq "ARRAY")
107 1 0 if (scalar @{$params{'text'};} == 0)
145 1 17 if (ref $_[0] eq 'HASH') { }
3 14 elsif (scalar(@_) % 2 == 0) { }
153 2 16 unless (defined $params{'text'})
158 3 13 if (ref $params{'text'})
160 2 1 if (ref $params{'text'} eq "ARRAY")
161 1 1 if (scalar @{$params{'text'};} == 0)
175 5 9 if ($self->{'text'} and $self->{'text'} =~ /[\.\,;]\s*$/)
176 4 1 if ($params{'text'} =~ /^\s*[\.\,;]/)
248 1 1 unless (defined $self->{'text'})
300 1 1 if ($self->{'text'})