Branch Coverage

blib/lib/Data/Text.pm
Criterion Covered Total %
branch 37 38 97.3


line true false branch
53 1 25 if (not defined $class) { }
2 23 elsif (ref $class) { }
68 7 17 if (scalar @_)
91 1 12 if (ref $_[0] eq 'HASH') { }
4 8 elsif (scalar(@_) % 2 == 0) { }
99 1 12 unless (defined $params{'text'})
108 4 8 if (ref $params{'text'}) { }
110 1 3 if (ref $params{'text'} eq "ARRAY")
111 1 0 if (scalar @{$params{'text'};} == 0)
148 1 19 if (ref $_[0] eq 'HASH') { }
3 16 elsif (scalar(@_) % 2 == 0) { }
156 2 18 unless (defined $params{'text'})
168 3 15 if (ref $params{'text'})
170 2 1 if (ref $params{'text'} eq "ARRAY")
171 1 1 if (scalar @{$params{'text'};} == 0)
185 6 10 if ($self->{'text'} and $self->{'text'} =~ /\s*[\.\,;]\s*$/)
186 5 1 if ($params{'text'} =~ /^\s*[\.\,;]/)
258 1 1 unless (defined $self->{'text'})
310 1 1 if ($self->{'text'})