SNMP :: Info.

Uma interface Perl orientada a objetos para dispositivos de rede e MIBs através do SNMP
Baixe Agora

SNMP :: Info. Classificação e resumo

Propaganda

  • Rating:
  • Licença:
  • Perl Artistic License
  • Preço:
  • FREE
  • Nome do editor:
  • Max Baker
  • Site do editor:
  • http://search.cpan.org/~emiller/SNMP-Info-1.04/Info.pm

SNMP :: Info. Tag


SNMP :: Info. Descrição

Uma interface Perl orientada a objetos para dispositivos de rede e MIBs através do SNMP SNMP :: Info é uma interface Perl orientada a objetos para dispositivos de rede e MIBs através do SNMP.Synopsis Use SNMP :: Info; Minhas $ Info = New SNMP :: Info (# Auto Descubra mais específico Classe de dispositivo AutoSpecify => 1, DEBUG => 1, # O restante é passado para SNMP :: Session Desthost => 'Router', Comunidade => 'Public' , Versão => 2) ou morrer "não pode se conectar ao dispositivo.n"; meu $ err = $ info-> erro (); Die "SNMP Community ou versão provavelmente incorretamente conectando ao dispositivo. $ errn" se definido $ err; $ NAME = $ info-> Nome (); $ classe = $ info-> Classe (); Imprimir "SNMP :: Info está usando esta classe de dispositivo: $ classn"; # Descubra o status duplex para as portas Minhas interfaces $ info-> interfaces (); Meu $ I_DUPLEX = $ info-> i_duplex (); # Obtenha informações do vizinho do CDP Meu $ C_IF = $ info-> c_if (); meu $ c_IP = $ info-> c_ip (); meu $ c_port = $ info-> c_port (); # Imprimir dados por porta foreach my $ iid (teclas% $ interfaces) {my $ Duplex = $ i_Duplex -> {$ iid}; # Imprima o nome da porta física, não SNMP IId Minhas $ Port = $ Interfaces -> {$ IID}; Imprimir "$ porto:"; Imprimir "$ duplex" se definido $ duplex; # A tabela CDP possui entradas de tabela diferentes do que as tabelas de interface. # Então usamos C_IF para obter o mapa da tabela CDP para interface. meu% c_map = inverter% $ c_IF; meu $ c_key = $ c_map {$ iid}; a menos que (definido $ c_key) {imprimir "nn"; Next; } meu $ vizo_ip = $ c_IP -> {$ c_key}; meu $ vizo_port = $ c_port -> {$ c_key}; Imprimir "conectado a $ vizinho_ip / $ vizinho_portn" se definido $ vizinhança_ip; Imprimir "n"; } Requisitos: · Perl.


SNMP :: Info. Software Relacionado