| line |
true |
false |
branch |
|
42
|
0 |
3 |
if ($self->{'OPTS'}{'show'}) { } |
|
|
0 |
3 |
elsif (@_ < 2) { } |
|
43
|
0 |
0 |
unless @_ |
|
58
|
0 |
3 |
-t STDOUT ? : |
|
|
3 |
0 |
unless defined $self->{'OPTS'}{'colors'} |
|
62
|
0 |
0 |
if $@ |
|
107
|
0 |
3 |
$self->{'OPTS'}{'full'} ? : |
|
110
|
3 |
0 |
if ($self->{'OPTS'}{'ofmt'} eq 'term') |
|
111
|
0 |
3 |
unless $self->diff_term($diff) |
|
120
|
2 |
0 |
unless @{$in_a;} |
|
128
|
0 |
0 |
if ($i_a - $out_a[-1][-1] < 2 and $i_b - $out_b[-1][-1] < 2) { } |
|
157
|
1 |
2 |
unless exists ${$dref;}->{'N'} |
|
158
|
0 |
2 |
unless (exists ${$dref;}->{'O'}) |
|
164
|
2 |
0 |
if ${$dref;}->{'O'} and not ref ${$dref;}->{'O'} |
|
166
|
2 |
0 |
if ${$dref;}->{'N'} and not ref ${$dref;}->{'N'} |
|
168
|
2 |
0 |
if (@old > 1 or @new > 1) |
|
172
|
0 |
2 |
if ($old[-1] eq '' and $new[-1] eq '') |
|
182
|
0 |
0 |
if $ro->[0] > $po |
|
184
|
0 |
0 |
if $rn->[0] > $pn |
|
192
|
2 |
0 |
if $po <= $#old |
|
194
|
2 |
0 |
if $pn <= $#new |
|
207
|
0 |
0 |
if ($self->{'OPTS'}{'ofmt'} eq 'term') { } |
|
|
0 |
0 |
elsif ($self->{'OPTS'}{'ofmt'} eq 'brief') { } |
|
|
0 |
0 |
elsif ($self->{'OPTS'}{'ofmt'} eq 'rules') { } |
|
231
|
0 |
0 |
if exists ${$dref;}->{$tag} |
|
245
|
0 |
0 |
unless exists ${$dref;}->{$_} |
|
249
|
0 |
0 |
$_ eq 'R' ? : |
|
271
|
0 |
0 |
if exists ${$dref;}->{$tag} |
|
282
|
0 |
0 |
unless my $data = $self->load($name) |
|
286
|
0 |
0 |
if ($self->{'OPTS'}{'show'}) { } |
|
291
|
0 |
0 |
unless @items > 1 |
|
296
|
0 |
0 |
unless $diff = $self->diff($items[0]{'data'}, $items[1]{'data'}) |
|
302
|
0 |
0 |
unless $self->{'OPTS'}{'quiet'} |
|
304
|
0 |
0 |
unless not keys %{$diff;} or exists $diff->{'U'} |
|
307
|
0 |
0 |
unless $self->{'status'} |
|
315
|
0 |
6 |
unless my $data = $self->load_struct($_[0], $self->{'OPTS'}{'ifmt'}) |
|
318
|
0 |
6 |
if @{$self->{'OPTS'}{'grep'};} |
|
320
|
0 |
6 |
if ref $data |
|
329
|
0 |
0 |
unless @{$path;} |
|
332
|
0 |
0 |
if $status eq 'N' |
|
336
|
0 |
0 |
if ($self->{'OPTS'}{'colors'}) |
|
354
|
0 |
0 |
if (@{$path;} and my(@delta) = &path_delta($self->{'hdr_path'}, $path)) |
|
357
|
0 |
0 |
if not $self->{'OPTS'}{'full-headers'} and $s < @{$path;} - @delta |
|
359
|
0 |
0 |
if ($status eq 'A' || $status eq 'R' and $s == $#{$path;}) { } |
|
361
|
0 |
0 |
if $self->{'OPTS'}{'colors'} |
|
379
|
0 |
0 |
unless -t STDOUT |
|
381
|
0 |
0 |
@names == 1 ? : |
|
385
|
0 |
0 |
if $self->{'OPTS'}{'colors'} |
|
393
|
0 |
0 |
if $status eq 'T' |
|
403
|
0 |
0 |
if ref $value or not defined $value |
|
409
|
0 |
0 |
if $self->{'OPTS'}{'colors'} |
|
426
|
0 |
0 |
if ($status eq 'U') |
|
427
|
0 |
0 |
if ($self->{'OPTS'}{'ctx-text'}) { } |
|
429
|
0 |
0 |
if @out |
|
432
|
0 |
0 |
if @head_ctx > $self->{'OPTS'}{'ctx-text'} |
|
434
|
0 |
0 |
unless @{$diff;} |
|
438
|
0 |
0 |
$self->{'OPTS'}{'colors'} ? : |
|
442
|
0 |
0 |
$self->{'OPTS'}{'colors'} ? : |
|
450
|
0 |
0 |
if (@head_ctx or not $self->{'OPTS'}{'ctx-text'} and $status eq 'U' and @{$diff;} or not @out) |
|
452
|
0 |
0 |
$self->{'OPTS'}{'colors'} ? : |
|
457
|
0 |
0 |
$self->{'OPTS'}{'colors'} ? : |