| line |
true |
false |
branch |
|
92
|
1 |
1158 |
if ($self->prefix_length > $max) |
|
104
|
4 |
790 |
unless defined $p{'string'} |
|
110
|
256 |
88 |
inet_pton(10, $address) ? : |
|
|
446 |
344 |
$p{'version'} ? : |
|
113
|
45 |
745 |
if ($version == 6 and inet_pton(2, $address)) |
|
120
|
18 |
772 |
unless defined $integer |
|
137
|
38 |
32 |
ref $integer ? : |
|
162
|
3 |
13556 |
$self->prefix_length == 0 ? : |
|
179
|
250 |
12197 |
if ($base & $mask) != $base |
|
197
|
5 |
279 |
if $current_ip > $last_ip |
|
248
|
25 |
21 |
if ($thing->isa('Net::Works::Address')) { } |
|
|
21 |
0 |
elsif ($thing->isa('Net::Works::Network')) { } |
|
268
|
2 |
32 |
if $self->prefix_length == $self->bits |
|
298
|
2 |
3 |
shift() || &any(sub {
/:/;
}
, $first_ip, $last_ip) ? : |
|
300
|
5 |
0 |
unless ref $first_ip |
|
305
|
5 |
0 |
unless ref $last_ip |
|
392
|
8 |
74 |
if $reserved_last <= $first_ip |
|
393
|
8 |
66 |
if $last_ip < $reserved_first |
|
395
|
54 |
12 |
if $first_ip < $reserved_first |
|
398
|
5 |
61 |
if ($last_ip <= $reserved_last) |
|
406
|
8 |
5 |
if $add_remaining |
|
435
|
309 |
17 |
$version == 6 ? : |
|
438
|
309 |
17 |
$version == 6 ? : |
|
466
|
30 |
0 |
if $self->isa('Net::Works::Network') |
|
|
0 |
30 |
unless &blessed($self) and &blessed($other) and eval {
do {
$other->isa('Net::Works::Network') if $self->isa('Net::Works::Network')
}
} |
|
473
|
0 |
30 |
shift() ? : |