SNMP :: INFORMACIÓN Una interfaz Perl orientada a objetos a dispositivos de red y MIB a través de SNMP
Descargar ahora

SNMP :: INFORMACIÓN Clasificación y resumen

SNMP :: INFORMACIÓN Etiquetas

red Módulo perl perla dispositivos Interfaz Perl dispositivos de red

SNMP :: INFORMACIÓN Descripción

Una interfaz Perl orientada a un objeto a dispositivos de red y MIB a través de SNMP SNMP :: La información es una interfaz Perl orientada a objetos para dispositivos de red y MIB a través de SNMP.SYNOPSIS USE SNMP :: INFO; MY $ INFO = NEW SNMP :: Info (# AUTO Descubra la clase de dispositivo más específica autoespecify => 1, depuración => 1, # El resto se pasa a SNMP :: Sesión Desthost => 'Router', Community => 'Public' , Versión => 2) o die "no se puede conectar a dispositivo.n"; My $ error = $ info-> error (); Die "SNMP Community o versión probablemente incorrecta conectando al dispositivo. $ Errn" si se define $ ERR; $ nombre = $ info-> nombre (); $ clase = $ info-> clase (); Imprimir "SNMP :: La información está usando esta clase de dispositivo: $ CANDSN"; # Descubra el estado dúplex para los puertos MIS $ Interfaces = $ info-> interfaces (); My $ i_duplex = $ info-> i_duplex (); # Obtener información del vecino de CDP My $ C_IF = $ info-> c_if (); My $ c_ip = $ info-> c_ip (); mi $ c_port = $ info-> c_port (); # Imprimir datos de impresión por puerto foreach My $ iid (teclas% $ interfaces) {My $ duplex = $ iidduplex -> {$ iid}; # Imprima el nombre del puerto físico, no es SNMP IID MIS $ PORT = $ Interfaces -> {$ iid}; imprimir "$ puerto:"; Imprimir "$ DUPLEX DUPLEX" si se define $ DUPLEX; # La tabla CDP tiene entradas de tabla diferentes a las tablas de la interfaz. # Entonces, usamos C_IF para obtener el mapa de la tabla CDP a la Tabla de Interfaz. mi% c_map = inverso% $ c_if; My $ C_KEY = $ C_MAP {$ IID}; a menos que (definido $ c_key) {impresión "nn"; Siguiente; } My $ vecino_ip = $ c_ip -> {$ c_key}; My $ vecino_port = $ c_port -> {$ c_key}; Imprimir "conectado a $ vecino_ip / $ vecino_portn" si se define $ vecino_ip; Imprimir "n"; } Requisitos: · Perl

SNMP :: INFORMACIÓN Software relacionado