Fixed potential warnings about "Use of uninitialized value in string eq"
This commit is contained in:
18
Info/Ipv6.pm
18
Info/Ipv6.pm
@@ -216,15 +216,15 @@ sub ipv6_n2p_state {
|
|||||||
|
|
||||||
sub method_used {
|
sub method_used {
|
||||||
my $info = shift;
|
my $info = shift;
|
||||||
my $return;
|
my $return = 'none of the MIBs';
|
||||||
if ($info::METHOD eq IPMIB) {
|
if (defined $info::METHOD) {
|
||||||
$return = 'IP-MIB';
|
if ($info::METHOD eq IPMIB) {
|
||||||
} elsif ($info::METHOD eq IPV6MIB) {
|
$return = 'IP-MIB';
|
||||||
$return = 'IPV6-MIB';
|
} elsif ($info::METHOD eq IPV6MIB) {
|
||||||
} elsif ($info::METHOD eq CISCO) {
|
$return = 'IPV6-MIB';
|
||||||
$return = 'CISCO-IETF-IP-MIB';
|
} elsif ($info::METHOD eq CISCO) {
|
||||||
} else {
|
$return = 'CISCO-IETF-IP-MIB';
|
||||||
$return = 'none of the MIBs';
|
}
|
||||||
}
|
}
|
||||||
return $return;
|
return $return;
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user