| line |
true |
false |
branch |
|
30
|
0 |
14 |
if ($nan eq 'exclude' and $inf eq 'exclude') { } |
|
|
0 |
14 |
elsif ($nan eq 'exclude') { } |
|
32
|
0 |
0 |
if &looks_like_number($_) and $_ != 'inf' |
|
37
|
0 |
0 |
if $l and $l != 36 |
|
42
|
0 |
14 |
if ($inf eq 'exclude') |
|
44
|
0 |
0 |
!&looks_like_number($_) ? : |
|
50
|
6 |
8 |
if ($inf eq 'number') { } |
|
53
|
1 |
29 |
if ($num == 9**9**9 and $_ == 9**9**9) { } |
|
|
1 |
28 |
elsif ($num == 9**9**9 and $_ == -9**9**9) { } |
|
|
1 |
27 |
elsif ($num == -9**9**9 and $_ == 9**9**9) { } |
|
|
1 |
26 |
elsif ($num == -9**9**9 and $_ == -9**9**9) { } |
|
|
5 |
21 |
elsif ($num == 9**9**9) { } |
|
|
5 |
16 |
elsif ($num == -9**9**9) { } |
|
|
4 |
12 |
elsif ($_ == 9**9**9) { } |
|
|
4 |
8 |
elsif ($_ == -9**9**9) { } |
|
65
|
0 |
32 |
unless $Number::Closest::NonOO::a->[1] <=> $Number::Closest::NonOO::b->[1] or $Number::Closest::NonOO::a->[2] <=> $Number::Closest::NonOO::b->[2] |
|
68
|
0 |
20 |
unless $Number::Closest::NonOO::a->[1] <=> $Number::Closest::NonOO::b->[1] |
|
74
|
5 |
9 |
if $args{-'farthest'} |
|
75
|
8 |
6 |
unless $items >= @res |
|
77
|
6 |
8 |
if ($items == 1) { } |