line |
true |
false |
branch |
82
|
0 |
1 |
unless (defined $data) |
110
|
5 |
52 |
if ($command eq 'set') { } |
|
7 |
45 |
elsif ($command eq 'add') { } |
|
37 |
8 |
elsif ($command =~ /^[Ss]cope$/) { } |
118
|
5 |
0 |
if ($the_rest[0] eq 'optionvalue' and $the_rest[1] =~ /^[0-9]+$/ and defined $the_rest[3]) |
138
|
7 |
0 |
if ($the_rest[0] eq 'scope' and defined $the_rest[1] and defined $the_rest[2]) |
151
|
16 |
21 |
if ($the_rest[1] eq 'set' and $the_rest[2] eq 'optionvalue') { } |
|
7 |
28 |
elsif ($the_rest[1] eq 'Add' and $the_rest[2] eq 'iprange') { } |
262
|
0 |
28 |
if (not defined $hostname) { } |
|
0 |
28 |
elsif (not defined $scope) { } |
|
0 |
28 |
elsif (not defined $option) { } |
|
0 |
28 |
elsif (not defined $values->[0]) { } |
274
|
1 |
27 |
if ($option eq '51' and $values->[0] =~ /^[Uu]/) |
283
|
1 |
26 |
unless (defined $self->{'servers'}{$hostname}) |
287
|
1 |
26 |
unless (defined $self->{'servers'}{$hostname}{$scope}) |
291
|
27 |
0 |
unless (defined $self->{'servers'}{$hostname}{$scope}{$option}) |
328
|
0 |
7 |
if (not defined $hostname) { } |
|
0 |
7 |
elsif (not defined $scope) { } |
|
0 |
7 |
elsif (not defined $mask) { } |
|
0 |
7 |
elsif (not defined $desc) { } |
340
|
0 |
7 |
unless (defined $self->{'servers'}{$hostname}) |
344
|
7 |
0 |
unless (defined $self->{'servers'}{$hostname}{$scope}) |