Branch Coverage

blib/lib/String/Replace.pm
Criterion Covered Total %
branch 20 28 71.4


line true false branch
15 3 6 if (@_ == 1 and ref $_[0] and reftype($_[0]) eq 'HASH') { }
0 6 elsif (@_ == 1 and ref $_[0] and reftype($_[0]) eq 'ARRAY') { }
23 0 9 if @l & 1
37 2 2 if (@_ == 1 and ref $_[0] and reftype($_[0]) eq 'HASH') { }
0 2 elsif (@_ == 1 and ref $_[0] and reftype($_[0]) eq 'ARRAY') { }
45 0 4 if @l & 1
51 0 8 ref $val && reftype $val eq 'ARRAY' ? :
104 5 7 if (wantarray) { }
6 1 elsif (defined wantarray) { }
107 6 0 @_ ? :
127 0 17 unless @_
129 10 7 if (blessed($_[0]) and $_[0]->isa('String::Replace')) { }
137 0 4 unless @_
139 2 2 if (blessed($_[0]) and $_[0]->isa('String::Replace')) { }