Fixed potential warnings about "Use of uninitialized value in string eq"

This commit is contained in:
Jeroen van Ingen
2010-08-23 11:47:58 +00:00
parent 2529305803
commit 0ccf5409ca

View File

@@ -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 (defined $info::METHOD) {
if ($info::METHOD eq IPMIB) { if ($info::METHOD eq IPMIB) {
$return = 'IP-MIB'; $return = 'IP-MIB';
} elsif ($info::METHOD eq IPV6MIB) { } elsif ($info::METHOD eq IPV6MIB) {
$return = 'IPV6-MIB'; $return = 'IPV6-MIB';
} elsif ($info::METHOD eq CISCO) { } elsif ($info::METHOD eq CISCO) {
$return = 'CISCO-IETF-IP-MIB'; $return = 'CISCO-IETF-IP-MIB';
} else { }
$return = 'none of the MIBs';
} }
return $return; return $return;
} }