Добрый день.

потребовалось при пмощи 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
...

Если не сложно подскажите как решить проблему, было бы здорово если покажите пример.