TIE :: NETADDR :: IP

implementa un hash donde la llave es una subred
Descargar ahora

TIE :: NETADDR :: IP Clasificación y resumen

Anuncio publicitario

  • Rating:
  • Licencia:
  • Perl Artistic License
  • Precio:
  • FREE
  • Nombre del editor:
  • Luis Mu
  • Sitio web del editor:
  • http://search.cpan.org/~luismunoz/

TIE :: NETADDR :: IP Etiquetas


TIE :: NETADDR :: IP Descripción

Implementa un hash donde la llave es una subred. TIE :: NETADDR :: IP es un módulo PERL que sobrecarga los hashes para que la clave pueda ser una subred que en NETADDR :: IP. Al aparecer valores arriba, se hará una interpretación para encontrar la clave dada dentro de las subredes especificadas en el hash. La muestra de código proporcionada en la sinopsis imprimiría las ubicaciones de cada máquina en la bucle forach.care, como se debe tomar, como solo Las cadenas que se pueden analizar como una dirección IP por NETADDR :: IP se puede usar como claves para este hash. Los creadores en el hash, como foreach, cada uno, las teclas y los valores solo verán las subredes reales que se proporcionan como claves del hash. Al buscar un valor, como en $ hash {$ ipaddress}, esta dirección IP se buscará entre las subredes existentes como las teclas dentro del hash. La subred coincidente con la máscara más larga (es decir, la subred más específica) ganará y su valor asociado será devuelto. Este código se puede distribuir libremente de acuerdo con los términos establecidos en la licencia Perl, siempre que se mantenga el crédito adecuado. Envíe informes de errores y comentarios al autor para mejorar la mejora. SESYNOPSIS Uso Lazo :: NETADDR :: IP; mi% donde estas TIE% WONS, TIE :: NETADDR :: IP; $ Where {"10.0.10.0/24"} = "laboratorio, primer piso"; $ Where {"10.0.20.0/24"} = "DataCenter, segundo piso"; $ Where {"10.0.30.0/27"} = "Ubicación remota"; $ Whereis {"0.0.0.0/0"} = "Dios sabe dónde"; foreach $ host ("10.0.10.1", "10.0.20.15", "10.0.32.17", "10.10.1.1") {impresión "host host $ host está en", $ wonde {$ host}, "\ n"; } foreach $ subred (teclas% donde está) {imprimir "red", $ subred, "se usa en", $ wonde {$ subred}, "\ n"; } desatar% donde; Requisitos: · Perl ¿Qué hay de nuevo en este lanzamiento: · Actualización general. Parche de Kazuyuki Maejima para arreglar el error relacionado con las teclas, a continuación, cada una, etc.


TIE :: NETADDR :: IP Software relacionado

filtrante

permite que las pruebas de la unidad se diseñen para los programas de línea de comandos ...

125

Descargar