line |
true |
false |
branch |
77
|
1 |
1 |
@_ == 2 ? : |
86
|
2 |
1 |
if (exists ${$hunk;}->{'A'}) { } |
|
0 |
1 |
elsif (exists ${$hunk;}->{'N'}) { } |
|
0 |
1 |
elsif (exists ${$hunk;}->{'R'}) { } |
111
|
1 |
11 |
unless ref $_[1] eq 'ARRAY' |
114
|
1 |
10 |
unless ref $hunk eq 'HASH' |
115
|
1 |
9 |
unless defined $hunk->{'op'} |
116
|
1 |
8 |
unless exists $hunk->{'path'} |
118
|
1 |
7 |
unless my $path = eval {
do {
str2path($hunk->{'path'})
}
} |
121
|
2 |
5 |
if ($hunk->{'op'} eq 'add' or $hunk->{'op'} eq 'replace') { } |
|
1 |
4 |
elsif ($hunk->{'op'} eq 'remove') { } |
|
2 |
2 |
elsif ($hunk->{'op'} eq 'move' or $hunk->{'op'} eq 'copy') { } |
|
1 |
1 |
elsif ($hunk->{'op'} eq 'test') { } |
122
|
1 |
1 |
unless exists $hunk->{'value'} |
133
|
1 |
0 |
unless eval {
do {
&path($_[0], $path, 'delete', 1)
}
} |
137
|
1 |
1 |
unless my $from = eval {
do {
str2path($hunk->{'from'})
}
} |
145
|
1 |
0 |
unless @found |
150
|
0 |
1 |
unless exists $hunk->{'value'} |
151
|
1 |
0 |
unless my(@found) = &path($_[0], $path, 'deref', 1) |
154
|
0 |
0 |
if keys %{$diff;} |