change SNMP to be a cached transport singleton
This commit is contained in:
@@ -100,7 +100,7 @@ unless ($action) {
|
||||
use NetAddr::IP qw/:rfc3021 :lower/;
|
||||
use Dancer ':script';
|
||||
|
||||
use App::Netdisco::Util::SNMP ();
|
||||
use App::Netdisco::Core::Transport::SNMP;
|
||||
use App::Netdisco::Util::Device
|
||||
qw/get_device delete_device renumber_device/;
|
||||
|
||||
@@ -138,7 +138,7 @@ unless ($action) {
|
||||
$extra = $class;
|
||||
undef $class;
|
||||
}
|
||||
my $i = App::Netdisco::Util::SNMP::snmp_connect($device, $class);
|
||||
my $i = App::Netdisco::Core::Transport::SNMP->instance->reader_for($device, $class);
|
||||
Data::Printer::p($i->$extra);
|
||||
return ('done', sprintf "Showed %s response from %s.", $extra, $device->ip);
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user