Branch Coverage

blib/lib/String/Diff.pm
Criterion Covered Total %
branch 72 82 87.8


line true false branch
10 6 7 if ($ENV{'STRING_DIFF_PP'}) { }
15 13 0 if ($@)
17 0 13 if $@
36 30 96 if ($opts{'linebreak'}) { }
39 60 106 if ($line->[0] eq 'c') { }
32 74 elsif ($line->[0] eq '-') { }
20 54 elsif ($line->[0] eq '+') { }
59 100 26 wantarray ? :
64 2 154 unless $old or $new
70 304 4 $_ ? :
73 1032 6696 if ($last_mode ne $line->[0])
74 1032 0 if defined $old_str
75 1032 0 if defined $new_str
78 0 1032 unless defined $old_str
79 0 1032 unless defined $new_str
88 154 0 if defined $old_str
89 154 0 if defined $new_str
103 312 2060 if $line->[0] eq 'c'
104 112 2260 if ($last_line->[0] eq $line->[0])
108 1526 734 if length $last_line->[1]
111 270 38 if length $last_line->[1]
124 23 22 wantarray ? :
132 2 88 if ($opts{'escape'} and ref $opts{'escape'} eq 'CODE')
136 6 752 $escape ? :
137 97 661 if ($parts->[0] eq '-') { }
177 484 elsif ($parts->[0] eq '+') { }
158 20 35 if ($opts{'regexp'}) { }
3 64 elsif ($opts{'escape'} and ref $opts{'escape'} eq 'CODE') { }
165 195 308 $escape ? :
166 195 308 $escape ? :
168 276 227 if ($old_diff->[$old_c][0] eq 'u' and $new_diff->[$new_c][0] eq 'u') { }
67 160 elsif ($old_diff->[$old_c][0] eq '-' and $new_diff->[$new_c][0] eq '+') { }
114 46 elsif ($old_diff->[$old_c][0] eq 'u' and $new_diff->[$new_c][0] eq '+') { }
46 0 elsif ($old_diff->[$old_c][0] eq '-' and $new_diff->[$new_c][0] eq 'u') { }
174 39 28 unless $opts{'regexp'}
175 28 39 if $opts{'regexp'}
199 40 70 if ($opts{'regexp'}) { }
6 128 elsif ($opts{'escape'} and ref $opts{'escape'} eq 'CODE') { }
205 8 14 $escape ? :
206 9 13 if ($diff->[$c][0] eq '-') { }
13 0 elsif ($diff->[$c][0] eq '+') { }