Branch Coverage

blib/lib/Data/Text.pm
Criterion Covered Total %
branch 32 34 94.1


line true false branch
54 1 20 unless (defined $class)
59 6 14 if (scalar @_)
84 0 9 if (ref $_[0] eq 'HASH') { }
3 6 elsif (scalar(@_) % 2 == 0) { }
92 1 8 unless (defined $params{'text'})
97 2 6 if (ref $params{'text'}) { }
99 1 1 if (ref $params{'text'} eq "ARRAY")
100 1 0 if (scalar @{$params{'text'};} == 0)
138 1 17 if (ref $_[0] eq 'HASH') { }
3 14 elsif (scalar(@_) % 2 == 0) { }
146 2 16 unless (defined $params{'text'})
151 3 13 if (ref $params{'text'})
153 2 1 if (ref $params{'text'} eq "ARRAY")
154 1 1 if (scalar @{$params{'text'};} == 0)
168 5 9 if ($self->{'text'} and $self->{'text'} =~ /[\.\,;]\s*$/)
169 4 1 if ($params{'text'} =~ /^\s*[\.\,;]/)
241 1 1 unless (defined $self->{'text'})