diff options
author | Kristian Lyngstol <kly@kly.no> | 2016-03-16 22:09:57 +0000 |
---|---|---|
committer | Kristian Lyngstol <kly@kly.no> | 2016-03-16 22:09:57 +0000 |
commit | ae8d11f9e6383cfd0adfed47343f53f330883d7c (patch) | |
tree | 2ee10ec8317c968fff39bec44b399b4432540e7d /clients | |
parent | 14a7305a06c2a9651593137094a8d2f39af66c05 (diff) |
NMS: Slightly better OID-list (not complete)
Diffstat (limited to 'clients')
-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); |