line |
true |
false |
branch |
68
|
0 |
0 |
if (not defined $dir) { } |
|
0 |
0 |
elsif (not -d $dir) { } |
75
|
0 |
0 |
unless (defined $name) |
126
|
0 |
0 |
if ($@ or $!) |
129
|
0 |
0 |
if ($@) { } |
150
|
0 |
0 |
if (ref $ref_test eq 'HASH' and defined $loaded{$file}{$current_key}{'mask'}) |
160
|
0 |
0 |
if (defined $subnets{'_'}) |
170
|
0 |
0 |
if (defined $loaded{$file}{$current_subnet}{'base'}) |
179
|
0 |
0 |
if (not $@ and defined $cidr) |
186
|
0 |
0 |
if ($in_file eq $file) |
194
|
0 |
0 |
if (defined $overlaps[0]) |
196
|
0 |
0 |
unless (defined $to_return{$file}) |
199
|
0 |
0 |
unless (defined $to_return{$file}{$current_subnet}) |
239
|
0 |
0 |
unless (defined $cidr and defined $file) |
246
|
0 |
0 |
unless ($cidr =~ m[/]) |
253
|
0 |
0 |
if ($@ or not defined $cidr_test) |
260
|
0 |
0 |
if ($@ or $!) |
262
|
0 |
0 |
if ($@) { } |
278
|
0 |
0 |
if (ref $ref_test eq 'HASH' and defined $ini->{$current_key}{'mask'}) |
288
|
0 |
0 |
if (defined $subnets{'_'}) |
293
|
0 |
0 |
if (defined $ignore and defined $subnets{$ignore}) |
307
|
0 |
0 |
if (defined $ini->{$subnet_current}{'base'}) |
313
|
0 |
0 |
unless ($@) |
317
|
0 |
0 |
if ($set->contains_any($cidr_other)) |