line |
true |
false |
branch |
32
|
1 |
126 |
unless ($lists and ref $lists and ref $lists eq 'ARRAY') |
36
|
1 |
548 |
unless ($list and ref $list and ref $list eq 'ARRAY') |
42
|
0 |
125 |
if defined $limit and $limit < 0 |
44
|
0 |
125 |
if defined $opts{'key_cb'} and ref $opts{'key_cb'} ne 'CODE' |
47
|
0 |
125 |
if defined $opts{'uniq_cb'} and ref $opts{'uniq_cb'} ne 'CODE' |
50
|
1 |
124 |
unless @$lists |
55
|
87 |
37 |
if (defined $opts{'method'}) |
59
|
18 |
19 |
if (defined $opts{'key_cb'}) { } |
64
|
18 |
0 |
scalar @$lists < 100 ? : |
77
|
0 |
19 |
if ($limit < 0.05 * $total) { } |
|
2 |
17 |
elsif ($limit < 0.25 * $total) { } |
|
4 |
13 |
elsif ($limit < 0.75 * $total) { } |
78
|
0 |
0 |
scalar @$lists < 1000 ? : |
83
|
2 |
0 |
scalar @$lists < 500 ? : |
88
|
4 |
0 |
scalar @$lists < 100 ? : |
93
|
13 |
0 |
scalar @$lists < 100 ? : |
104
|
66 |
58 |
if ($method == 0) { } |
|
29 |
29 |
elsif ($method == 1) { } |
|
29 |
0 |
elsif ($method == 2) { } |
105
|
8 |
26 |
$uniq_cb ? : |
|
2 |
30 |
$uniq_cb ? : |
|
34 |
32 |
$key_cb ? : |
111
|
4 |
12 |
$uniq_cb ? : |
|
1 |
12 |
$uniq_cb ? : |
|
16 |
13 |
$key_cb ? : |
117
|
4 |
12 |
$uniq_cb ? : |
|
1 |
12 |
$uniq_cb ? : |
|
16 |
13 |
$key_cb ? : |
134
|
5 |
7 |
if $limit and @output > $limit |
152
|
5 |
7 |
if $limit and @output > $limit |
165
|
2 |
5 |
if defined $last_unique and $unique == $last_unique |
169
|
0 |
1 |
if $limit and @output > $limit |
187
|
5 |
11 |
if $seen{$unique}++ |
191
|
0 |
4 |
if $limit and @output > $limit |