line |
true |
false |
branch |
51
|
0 |
0 |
unless (defined $r) |
142
|
0 |
0 |
if ($file_count <= 0) |
150
|
0 |
0 |
if ($n > 0) { } |
154
|
0 |
0 |
unless open my $fd, ">", "$datadir/$file" |
161
|
0 |
0 |
unless open my $fd, ">", "$datadir/$file" |
179
|
0 |
0 |
if $b1 == 169 and $b2 == 254 |
180
|
0 |
0 |
if $b1 == 172 and ($b2 >= 16 and $b2 <= 31) |
181
|
0 |
0 |
if $b1 == 192 and $b2 == 168 |
182
|
0 |
0 |
if $b1 == 192 and $b2 == 0 and $b3 == 2 |
186
|
0 |
0 |
$n > 0 ? : |
193
|
0 |
0 |
if ($count and $current == $count) |
211
|
0 |
0 |
unless $self->brik_help_run_undef_arg("ipv4_generate_space_from_subnet", $subnet) |
216
|
0 |
0 |
if ($file_count <= 0) |
224
|
0 |
0 |
unless my $na = "Metabrik::Network::Address"->new_from_brik_init($self) |
228
|
0 |
0 |
if ($n > 0) { } |
232
|
0 |
0 |
unless open my $fd, ">", "$datadir/$file" |
240
|
0 |
0 |
unless open my $fd, ">", "$datadir/$file" |
248
|
0 |
0 |
unless my $first = $na->ipv4_first_address($subnet) |
249
|
0 |
0 |
unless my $last = $na->ipv4_last_address($subnet) |
263
|
0 |
0 |
$n > 0 ? : |
270
|
0 |
0 |
if ($count and $current == $count) |
292
|
0 |
0 |
if ($count <= 0) |
303
|
0 |
0 |
if $b1 == 169 and $b2 == 254 |
304
|
0 |
0 |
if $b1 == 172 and ($b2 >= 16 and $b2 <= 31) |
305
|
0 |
0 |
if $b1 == 192 and $b2 == 168 |
308
|
0 |
0 |
if $b1 == 192 and $b2 == 0 and $b3 == 2 |
312
|
0 |
0 |
unless (exists $random{$ip}) |
317
|
0 |
0 |
if $current == $count |