diff options
Diffstat (limited to 'clients/snmpfetchng.pl')
| -rwxr-xr-x | clients/snmpfetchng.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/clients/snmpfetchng.pl b/clients/snmpfetchng.pl index 5d1fd42..de8f802 100755 --- a/clients/snmpfetchng.pl +++ b/clients/snmpfetchng.pl @@ -103,7 +103,11 @@ sub inner_loop Community => $switch{'community'}, UseEnums => 1, Version => '2'); - $s->bulkwalk(0, 10, @nms::config::snmp_objects, sub{ callback(\%switch, @_); }); + my $ret = $s->bulkwalk(0, 10, @nms::config::snmp_objects, sub{ callback(\%switch, @_); }); + if (!defined($ret)) { + mylog("Fudge: ". $s->{'ErrorStr'}); + $outstanding--; + } } mylog( "Polling " . @switches . " switches: $poll_todo"); SNMP::MainLoop(5); |