remove root_ip()
This commit is contained in:
@@ -157,20 +157,6 @@ sub i_name {
|
|||||||
return \%i_name;
|
return \%i_name;
|
||||||
}
|
}
|
||||||
|
|
||||||
sub root_ip {
|
|
||||||
my $contivity = shift;
|
|
||||||
my $ip_table = $contivity->ip_table();
|
|
||||||
|
|
||||||
# Return First IP Address
|
|
||||||
foreach my $entry (keys %$ip_table){
|
|
||||||
my $router_ip = $ip_table->{$entry};
|
|
||||||
print " SNMP::Layer3::Contivity::root_ip() using $router_ip\n" if $contivity->debug();
|
|
||||||
next unless $router_ip;
|
|
||||||
return $router_ip if ($router_ip ne '0.0.0.0');
|
|
||||||
}
|
|
||||||
return undef;
|
|
||||||
}
|
|
||||||
|
|
||||||
1;
|
1;
|
||||||
__END__
|
__END__
|
||||||
|
|
||||||
@@ -264,11 +250,6 @@ Returns the chassis serial number.
|
|||||||
|
|
||||||
Returns the MAC address of the first Ethernet Interface.
|
Returns the MAC address of the first Ethernet Interface.
|
||||||
|
|
||||||
=item $contivity->root_ip()
|
|
||||||
|
|
||||||
Returns the primary IP used to communicate with the router. Returns the first
|
|
||||||
IP interface.
|
|
||||||
|
|
||||||
=back
|
=back
|
||||||
|
|
||||||
=head2 Overrides
|
=head2 Overrides
|
||||||
|
|||||||
Reference in New Issue
Block a user