diff --git a/Info/Layer2/Bay.pm b/Info/Layer2/Bay.pm index 07cbdbb7..7bc84d33 100644 --- a/Info/Layer2/Bay.pm +++ b/Info/Layer2/Bay.pm @@ -154,6 +154,7 @@ sub c_ip { my %ip_port; foreach my $entry (keys %$bay_topo_ip){ my $port = $bay_topo_port->{$entry}; + next unless defined $port; next if $port == 0; my $ip = $bay_topo_ip->{$entry}; push(@{$ip_port{$port}},$ip);