| line |
true |
false |
branch |
|
48
|
3 |
63 |
if ($self->{'OPTS'}{'show'}) { } |
|
|
1 |
62 |
elsif (@_ < 2) { } |
|
49
|
0 |
3 |
unless @_ |
|
64
|
62 |
3 |
unless defined $self->{'OPTS'}{'colors'} |
|
68
|
21 |
434 |
if ($self->{'OPTS'}{'colors'}) { } |
|
77
|
3 |
62 |
$self->{'OPTS'}{'colors'} ? : |
|
78
|
3 |
62 |
$self->{'OPTS'}{'colors'} ? : |
|
83
|
1 |
6 |
if $@ |
|
134
|
1 |
58 |
if ($self->{'OPTS'}{'full'}) |
|
150
|
54 |
5 |
if (exists $diff->{'D'}) { } |
|
|
1 |
4 |
elsif (exists $diff->{'U'}) { } |
|
156
|
45 |
14 |
if $self->{'OPTS'}{'ofmt'} eq 'term' |
|
172
|
25 |
47 |
unless exists ${$dref;}->{'N'} |
|
173
|
5 |
42 |
if ref ${$dref;}->{'O'} or ref ${$dref;}->{'N'} |
|
175
|
37 |
5 |
if ${$dref;}->{'O'} |
|
176
|
42 |
0 |
if ${$dref;}->{'N'} |
|
178
|
23 |
19 |
if (@old > 1 or @new > 1) |
|
182
|
13 |
10 |
if ($old[-1] eq '' and $new[-1] eq '') |
|
194
|
56 |
48 |
if ($match = !$match) { } |
|
196
|
33 |
23 |
if ($header) |
|
205
|
48 |
8 |
if (@cdiff > 4) |
|
207
|
38 |
10 |
$self->{'OPTS'}{'ctx-text'} ? : |
|
209
|
30 |
18 |
if (@rest or not $header) |
|
216
|
17 |
31 |
if (@del) |
|
223
|
40 |
8 |
if (@del) |
|
228
|
40 |
8 |
if (@add) |
|
247
|
42 |
15 |
if ($self->{'OPTS'}{'ofmt'} eq 'term') { } |
|
|
4 |
11 |
elsif ($self->{'OPTS'}{'ofmt'} eq 'brief') { } |
|
|
1 |
10 |
elsif ($self->{'OPTS'}{'ofmt'} eq 'rules') { } |
|
271
|
10 |
20 |
if exists ${$dref;}->{$tag} |
|
285
|
8 |
4 |
unless exists ${$dref;}->{$_} |
|
289
|
0 |
4 |
$_ eq 'R' ? : |
|
311
|
89 |
256 |
if exists ${$dref;}->{$tag} |
|
326
|
3 |
112 |
if ($self->{'OPTS'}{'show'}) { } |
|
330
|
1 |
2 |
if (my(@errs) = &Struct::Diff::valid_diff($diff)) |
|
340
|
56 |
56 |
unless @items > 1 |
|
349
|
57 |
1 |
unless $self->{'OPTS'}{'quiet'} |
|
351
|
54 |
1 |
unless not keys %{$diff;} or exists $diff->{'U'} |
|
354
|
4 |
54 |
unless $self->{'status'} |
|
365
|
6 |
115 |
if @{$self->{'OPTS'}{'grep'};} |
|
367
|
104 |
17 |
if (@data and ref $data[0]) |
|
377
|
6 |
4 |
if $status eq 'N' |
|
395
|
62 |
27 |
if (@{$path;} and my(@delta) = &path_delta($self->{'hdr_path'}, $path)) |
|
398
|
7 |
103 |
if not $self->{'OPTS'}{'full-headers'} and $s < @{$path;} - @delta |
|
401
|
17 |
86 |
if ($status eq 'A' || $status eq 'R' and $s == $#{$path;}) { } |
|
420
|
3 |
61 |
if ($self->{'TTY'} and not $self->{'OPTS'}{'quiet'}) |
|
423
|
1 |
2 |
@names == 1 ? : |
|
430
|
21 |
68 |
if $status eq 'T' |
|
440
|
12 |
56 |
if ref $value or not defined $value |
|
463
|
28 |
126 |
if ($status eq '@') |
|
465
|
19 |
9 |
$hdr[1] > 1 ? : |
|
|
19 |
9 |
$hdr[3] > 1 ? : |