Branch Coverage

blib/lib/List/MergeSorted/XS.pm
Criterion Covered Total %
branch 55 68 80.8


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