Добрый день.потребовалось при пмощи net::snmp получить с устройства список интерфесов, но не как не получается, хотя при это обычным snmpwalk получается.
%%%
my ($session, $error) = Net::SNMP->session(
-hostname => shift || 'ip',
-community => shift || 'piblic',
-port => shift || 161,
-version => shift || 1
);
$int = ".1.3.6.1.2.1.2.2.1.2";
$result = $session->get_request(
-varbindlist => [$int]
);
printf("host\n",
$session->hostname, $result->{$int}
);
$session->close;
%%%
через snmpwalk выводится нормально:
IF-MIB::ifDescr.1 = STRING: FastEthernet0/0
IF-MIB::ifDescr.2 = STRING: Serial0/0
IF-MIB::ifDescr.3 = STRING: FastEthernet0/1
IF-MIB::ifDescr.4 = STRING: FastEthernet2/0
IF-MIB::ifDescr.5 = STRING: Null0
...
Если не сложно подскажите как решить проблему, было бы здорово если покажите пример.