| line |
true |
false |
branch |
|
63
|
0 |
2 |
unless defined $val |
|
65
|
0 |
2 |
unless defined $net and defined $bits |
|
86
|
0 |
6 |
unless defined $val |
|
88
|
0 |
6 |
if defined $crud or not defined $end |
|
108
|
0 |
80 |
unless defined $_[3] |
|
144
|
0 |
6 |
if 1 == $start->Lexicompare($end) |
|
229
|
0 |
41 |
if (defined $result{$net}) { } |
|
308
|
0 |
6803 |
if ('Net::CIDR::Lookup::IPv6' ne ref $node) |
|
309
|
0 |
0 |
if $val eq $node |
|
312
|
82 |
6721 |
unless --$nbits |
|
313
|
5884 |
837 |
if (defined $node->[$bit]) { } |
|
324
|
0 |
30 |
if $checksub and defined $node->[$bit] and 'Net::CIDR::Lookup::IPv6' eq ref $node->[$bit] |
|
333
|
0 |
0 |
if not @node_stack and defined $$node[$bit ^ 1] and $$node[$bit ^ 1] eq $val |
|
338
|
0 |
82 |
unless defined $node |
|
339
|
76 |
0 |
unless defined $$node->[0] and defined $$node->[1] and $$node->[0] eq $$node->[1] |
|
352
|
0 |
0 |
unless $val == $oldval |
|
356
|
0 |
0 |
unless (eval {
do {
$root->_walk('Bit::Vector'->new(128), 0, sub {
my $oldval = $_[2];
die $oldval unless $val == $oldval;
}
);
1
}
}) |
|
357
|
0 |
0 |
if $@ |
|
368
|
4 |
488 |
unless defined $node->[$bit] |
|
369
|
8 |
480 |
if 'Net::CIDR::Lookup::IPv6' ne ref $node->[$bit] |
|
401
|
74 |
454 |
if $rightflag |
|
403
|
513 |
15 |
if ('Net::CIDR::Lookup::IPv6' eq ref $node) { } |
|
413
|
452 |
61 |
if ('Net::CIDR::Lookup::IPv6' eq ref $l) { } |
|
415
|
19 |
433 |
if defined $r |
|
422
|
22 |
39 |
if defined $l |
|
433
|
55 |
21 |
if ('Net::CIDR::Lookup::IPv6' eq ref $r) { } |
|
439
|
19 |
2 |
if defined $r |
|
467
|
74 |
80 |
if ($ix2 <= $ix1) { } |