Tie :: netaddr :: ip

implementa um hash onde a chave é uma sub-rede
Baixe Agora

Tie :: netaddr :: ip Classificação e resumo

Propaganda

  • Rating:
  • Licença:
  • Perl Artistic License
  • Preço:
  • FREE
  • Nome do editor:
  • Luis Mu
  • Site do editor:
  • http://search.cpan.org/~luismunoz/

Tie :: netaddr :: ip Tag


Tie :: netaddr :: ip Descrição

Implementa um hash onde a chave é uma sub-rede Tie :: NetAddR :: IP é um módulo Perl que sobrecarrega hashes para que a tecla possa ser uma sub-rede como no netaddr :: ip. Ao procurar valores, uma interpretação será feita para encontrar a chave indicada dentro das sub-redes especificadas no hash.A amostra de código fornecida na sinopseia imprimiria as localizações de todas as máquinas do foreach loop.care deve ser tomado, como apenas As cordas que podem ser analisadas como um endereço IP por NetAddR :: IP podem ser usadas como chaves para este hash.iterators no hash, como foreach, cada, chaves e valores só verão as sub-redes reais fornecidas como chaves para o hash. Ao procurar um valor, como em $ hash {$ iPaddress} Este endereço IP será examinado entre as sub-redes existentes como chaves dentro do hash. A sub-rede correspondente com a máscara mais longa (ou seja, a sub-rede mais específica) vencerá e seu valor associado será retornado. Este código pode ser distribuído livremente de acordo com os termos estabelecidos na licença Perl desde que o crédito adequado seja mantido. Por favor, envie relatórios de bug e feedback para o autor para melhoria adicional.Synopsis use gravata :: netaddr :: ip; meu% em que; Tie% em que, gravata :: netaddr :: ip; $ Por onde {"10.0.10.0/24"} = "laboratório, primeiro andar"; $ Em que {"10.0.20.0/24"} = "datacenter, segundo andar"; $ Whereis {"10.0.30.0/27"} = "localizado remoto"; $ Em que {"0.0.0.0/0"} = "Deus sabe onde"; foreach $ host ("10.0.10.1", "10.0.20.15", "10.0.32.17", "10.10.0.1") {Imprimir "host $ host está em", $ por whereis {$ host}, "\ n"; } foreach $ sub-rede (teclas% whereis) {imprimir "rede", $ sub-rede ", é usado em", $ por onde {$ subnet}, "\ n"; } desamarrar% em que; Requisitos: · Perl. O que há de novo nesta versão: · Atualização geral. Patch de Kazuyuki Maejima para corrigir o bug relacionado às chaves, em seguida, cada, etc.


Tie :: netaddr :: ip Software Relacionado

filtrounit.

permite que os testes unitários sejam criados para programas de linha de comando ...

125

Download