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 ? : |