Router :: estatísticas. estatísticas de roteador e coleta de informações
Baixe Agora

Router :: estatísticas. Classificação e resumo

Router :: estatísticas. Tag

Módulo Perl. perl Estatisticas roteador Estatísticas do roteador. Coleta de informações

Router :: estatísticas. Descrição

Router Estatística e Coleta de Informações Router :: Estatísticas é um módulo Perl para as estatísticas do roteador e informações collection.SYNOPSISRouter estatísticas e informações Colleciton. Atualmente esta cobre uma multidão de áreas de diferentes tipos de roteadores e em uma versão futura isso vai mudar. Existem algumas funções 'ação' dentro deste módulo que precisa se mudar para outro módulo para não reclamar muito, please.The seguintes exemplos mostra como configurar o módulo para recuperar estatísticas de interface de roteadores que suportam o IFMIB padrão. Todo o trabalho sobre OIDs etc é cuidado pelo módulo de modo que você é deixado com uma árvore de hash, enraizada pelas informações IPs roteador foi recebido para. usar Router :: Estatística; Use rigoroso; my ($ result, $ estatísticas); meus (% routers,% interfaces); $ estatísticas = new Router :: Estatísticas (); $ Result = $ estatísticas-> Router_Add ( "10.1.1.1", "público"); $ Result = $ estatísticas-> Router_Ready_Blocking ( "10.1.1.1"); .... $ result = $ estatísticas-> Router_Add ( "10.1.1.200", "público"); $ Result = $ estatísticas-> Router_Ready_Blocking ( "10.1.1.200"); $ Result = $ estatísticas-> Router_Test_Connection_Blocking (\% roteadores); if (!% roteadores) {print "Sem acesso a qualquer um dos roteadores especificado. "; Exit (0);} $ result = $ estatísticas-> Router_get_interfaces_Blocking (\% de interfaces); foreach my $ router (Keys% de interfaces) {print" Router IP é '$ router' "; Print" Router hostname é '$ routers {$ roteador} {' hostname '}' "; Foreach my $ Interface (keys% {$ interfaces de {$ router}}) {print" Interface ID '$ interface' "; Print" Interface Inscrição '$ interfaces de {$ UBR} {$ de interface} {' ifDescr '}' "; Print" Interface ifType '$ interfaces de {$ UBR} {$ de interface} {' ifType '}' '$ Interfaces de {$ UBR} {$ de interface} interface ifMtu {' ifMtu '}'; "print" '$ Interfaces de {$ UBR} {$ de interface} interface ifSpeed {' ifSpeed '}'; "print" '$ Interfaces de {$ UBR} {$ de interface} interface ifPhysAddress {' ifPhysAddress '}'; "print" '$ Interfaces de {$ UBR} {$ de interface} interface ifOperStatus {' ifOperStatus '}'; "print" "; Print" Interface ifInOctets '$ interfaces de {$ UBR} {$ de interface} {' ifInOctets '}' '$ Interfaces de {$ UBR} {$ de interface} interface ifInUcastPkts {' ifInUcastPkts '}'; "print" '$ Interfaces de {$ UBR} {$ de interface} interface ifInNUcastPkts {' ifInNUcastPkts '}'; "print" '$ Interfaces de {$ UBR} {$ de interface} interface ifInDiscards {' ifInDiscards '}'; "print" '$ Interfaces de {$ UBR} {$ de interface} interface ifInErrors {' ifInErrors '}'; "print" "; Print" Interface ifInUnknownProtos '$ interfaces de {$ UBR} {$ de interface} {' ifInUnknownProtos '}' "; impressão" Interface ifOutOctets '$ interfaces de {$ UBR} {$ de interface} {' ifOutOctets '}' "; impressão" Interface ifOutUcastPkts '$ interfaces de {$ UBR} {$ de interface} {' ifOutUcastPkts '}' "; impressão" Interface ifOutNUcastPkts '$ interfaces de {$ UBR} {$ de interface} {' ifOutNUcastPkts '}' "; impressão" Interface ifOutDiscards '$ interfaces de {$ UBR} {$ de interface} {' ifOutDiscards '}' "; impressão" Interface ifOutErrors '$ interfaces de {$ UBR} {$ de interface} {' ifOutErrors '}' "; imprimir " ";}} Atualmente, estou na necessidade de acesso a roteadores alternativas de fornecedores, ou seja, qualquer pessoa, mas Cisco (ABC) como eu só têm acesso real aos equipamentos Cisco para que este código não pode ser confirmado 100% contra ninguém else.I também gostaria. para expandir a biblioteca para cobrir outras ações, e não apenas funções DOCSIS, que é o foco principal ação na atual módulo moment.The tem dois (2) variáveis globais que podem ser definidos ao criar o objeto as primeiras voltas de depuração no todo o saída de depuração, o segundo, STM_Safety_Limit, permite alterar a margem de segurança STM subtraindo o número (minutos) indicado a partir do momento final. Este também é ajustável nas funções de MCT, mas apenas se estiver a usar um permitir exemplo password.An de como usá-los é de R $ estatísticas = new Router :: estatísticas (); Isto ativar depuração e definir o marging segurança aos 10 minutos o marging segurança padrão é de 15 minutos.. requisitos: · Perl.

Router :: estatísticas. Software Relacionado