Branch Coverage

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


line true false branch
64 15 15 unless $was_blank or $is_blank
82 2 118 !defined($_) ? :
84 0 2 $ref eq 'SCALAR' ? :
0 2 $ref eq 'REF' && ref $$_ ne 'REF' ? :
2 2 $ref eq 'HASH' ? :
2 4 $ref eq 'ARRAY' ? :
112 6 !$ref ? :
97 1 4 if defined $_ and not @_
98 3 2 1 == @_ ? :
102 1 0 $ref eq 'HASH' ? :
1 1 $ref eq 'ARRAY' ? :
1 2 !$ref ? :
107 5 0 if (%subst)
112 0 0 unless length $b <=> length $a
113 8 0 if length $_
135 19 0 @_ ? :
139 4 15 if ($count == 0) { }
0 15 elsif ($count == 1) { }
149 3 12 if exists $lr{'l'}
150 3 12 if exists $lr{'r'}
153 12 3 if %lr
157 17 2 if length $lead
160 17 2 if length $rear
167 2 0 @_ ? :
171 2 0 if ($count == 0) { }
0 0 elsif ($count == 1) { }
181 0 0 if exists $lr{'l'}
182 0 0 if exists $lr{'r'}
185 0 0 if %lr
189 2 0 if length $lead
192 2 0 if length $rear