| line |
true |
false |
branch |
|
80
|
0 |
0 |
if not defined $$options{'Direction'} or $$options{'Direction'} != 1 or $$options{'Direction'} != 2 |
|
85
|
0 |
0 |
if $$options{'Direction'} == 1 |
|
86
|
0 |
0 |
if $$options{'Direction'} == 2 |
|
100
|
0 |
0 |
if ref $data ne 'HASH' |
|
104
|
0 |
0 |
if ($$data{'type'} eq 'HASH') { } |
|
|
0 |
0 |
elsif ($$data{'type'} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($$data{'type'} =~ /^(REF:(.*))$/) { } |
|
116
|
0 |
0 |
if defined $$data{'same'} and scalar grep(/Same/, @{$$opt{'Filter'};}) |
|
117
|
0 |
0 |
if defined $$data{'diff'} and scalar grep(/Diff/, @{$$opt{'Filter'};}) |
|
118
|
0 |
0 |
if defined $$data{'diff_a'} and scalar grep(/Diff_A/, @{$$opt{'Filter'};}) |
|
119
|
0 |
0 |
if defined $$data{'diff_b'} and scalar grep(/Diff_B/, @{$$opt{'Filter'};}) |
|
120
|
0 |
0 |
if defined $$data{'uniq_a'} and scalar grep(/Uniq_A/, @{$$opt{'Filter'};}) |
|
121
|
0 |
0 |
if defined $$data{'uniq_b'} and scalar grep(/Uniq_B/, @{$$opt{'Filter'};}) |
|
134
|
0 |
0 |
if (scalar grep(/Same/, @{$$opt{'Filter'};})) |
|
140
|
0 |
0 |
if (scalar grep(/Diff/, @{$$opt{'Filter'};})) |
|
146
|
0 |
0 |
if (scalar grep(/Uniq_A/, @{$$opt{'Filter'};})) |
|
152
|
0 |
0 |
if (scalar grep(/Uniq_B/, @{$$opt{'Filter'};})) |
|
165
|
0 |
0 |
if (defined $$data{'same'} and scalar grep(/Same/, @{$$opt{'Filter'};})) |
|
169
|
0 |
0 |
if (defined $$data{'diff'} and scalar grep(/Diff/, @{$$opt{'Filter'};})) |
|
173
|
0 |
0 |
if (defined $$data{'uniq_a'} and scalar grep(/Uniq_A/, @{$$opt{'Filter'};})) |
|
177
|
0 |
0 |
if (defined $$data{'uniq_b'} and scalar grep(/Uniq_B/, @{$$opt{'Filter'};})) |
|
190
|
0 |
0 |
$a ? : |
|
|
0 |
0 |
$b ? : |
|
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
199
|
0 |
0 |
if (ref $a ne ref $b) |
|
209
|
0 |
0 |
$a ? : |
|
|
0 |
0 |
$b ? : |
|
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
214
|
0 |
0 |
if (not ref $a) { } |
|
|
0 |
0 |
elsif (ref $a eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (ref $a eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $a eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $a eq 'REF') { } |
|
228
|
0 |
0 |
if ($a eq $b) { } |
|
237
|
0 |
0 |
unless (defined $$out{'score'}) |
|
245
|
0 |
0 |
$a ? : |
|
|
0 |
0 |
$b ? : |
|
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
252
|
0 |
0 |
$$out{'orig_a'} ? : |
|
|
0 |
0 |
$$out{'orig_b'} ? : |
|
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
255
|
0 |
0 |
if (not defined $$out{'orig_a'} && defined $$out{'orig_b'}) { } |
|
256
|
0 |
0 |
unless $$out{'orig_a'} or $$out{'orig_b'} |
|
257
|
0 |
0 |
if $$out{'orig_a'} |
|
258
|
0 |
0 |
if $$out{'orig_b'} |
|
264
|
0 |
0 |
if ($$out{'score'}) { } |
|
273
|
0 |
0 |
$$out{'orig_a'} ? : |
|
|
0 |
0 |
$$out{'orig_b'} ? : |
|
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
282
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
286
|
0 |
0 |
if ($$out{'score'}) { } |
|
301
|
0 |
0 |
$$out{'orig_a'}{$_} ? : |
|
302
|
0 |
0 |
$$out{'orig_b'}{$_} ? : |
|
304
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
313
|
0 |
0 |
if (exists $$out{'orig_b'}{$key}) { } |
|
316
|
0 |
0 |
if (abs $$diff{'score'} > 1e-10) { } |
|
322
|
0 |
0 |
if abs $$diff{'score'} < 1 |
|
333
|
0 |
0 |
unless (exists $$out{'orig_a'}{$key_b}) |
|
341
|
0 |
0 |
$$out{'orig_a'}{$_} ? : |
|
342
|
0 |
0 |
$$out{'orig_b'}{$_} ? : |
|
344
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
375
|
0 |
0 |
if ref $item ne 'HASH' |
|
377
|
0 |
0 |
defined $$item{$key} ? : |
|
400
|
0 |
0 |
if (abs $$diff{'score'} < 1) { } |
|
408
|
0 |
0 |
if ($sort_cmp < 0) { } |
|
417
|
0 |
0 |
$_ ? : |
|
|
0 |
0 |
$_ ? : |
|
422
|
0 |
0 |
if ($ai == $#{$$out{'orig_b'};} or $bi == $#{$$out{'orig_b'};}) |
|
426
|
0 |
0 |
if ($table[$ai][$bi]) { } |
|
431
|
0 |
0 |
$r > $l ? : |
|
436
|
0 |
0 |
$_ ? : |
|
|
0 |
0 |
$_ ? : |
|
446
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
456
|
0 |
0 |
if ref $item ne 'HASH' |
|
458
|
0 |
0 |
defined $$item{$key} ? : |
|
475
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
485
|
0 |
0 |
if (abs $$diff{'score'} < 1) { } |
|
489
|
0 |
0 |
if (abs $$diff{'score'} > 1e-10) { } |
|
501
|
0 |
0 |
if ($sort_cmp < 0) { } |
|
515
|
0 |
0 |
if scalar @a |
|
516
|
0 |
0 |
if scalar @b |
|
521
|
0 |
0 |
if ${$$self{'debug'};}[0] |
|
534
|
0 |
0 |
unless defined $data |
|
535
|
0 |
0 |
unless ref $data |
|
536
|
0 |
0 |
if ref $data eq 'SCALAR' |
|
537
|
0 |
0 |
if ref $data eq 'HASH' |
|
538
|
0 |
0 |
if ref $data eq 'ARRAY' |
|
569
|
0 |
0 |
if ref $item ne 'HASH' |
|
571
|
0 |
0 |
defined $$item{$key} ? : |