Branch Coverage

blib/lib/String/Tools.pm
Criterion Covered Total %
branch 41 62 66.1


line true false branch
65 15 15 unless $was_blank or $is_blank
83 2 118 if (not defined $_) { }
112 6 elsif (not my $ref = ref $_) { }
2 4 elsif ($ref eq 'ARRAY') { }
2 2 elsif ($ref eq 'HASH') { }
0 2 elsif ($ref eq 'REF' and ref $$_ ne 'REF') { }
0 2 elsif ($ref eq 'SCALAR') { }
104 1 4 if defined $_ and not @_
107 3 2 if (1 == @_) { }
108 1 2 if (not my $ref = ref $_[0]) { }
1 1 elsif ($ref eq 'ARRAY') { }
1 0 elsif ($ref eq 'HASH') { }
114 5 0 if (%subst)
119 0 0 unless length $b <=> length $a
120 8 0 if length $_
142 19 0 @_ ? :
146 4 15 if ($count == 0) { }
0 15 elsif ($count == 1) { }
156 3 12 if exists $lr{'l'}
157 3 12 if exists $lr{'r'}
160 12 3 if %lr
164 17 2 if length $lead
167 17 2 if length $rear
174 2 0 @_ ? :
178 2 0 if ($count == 0) { }
0 0 elsif ($count == 1) { }
188 0 0 if exists $lr{'l'}
189 0 0 if exists $lr{'r'}
192 0 0 if %lr
196 2 0 if length $lead
199 2 0 if length $rear