NET :: CIDRManipulez IPv4 / IPv6 NetBlocks dans la notation de la CIDR | |
Télécharger maintenant |
NET :: CIDR Classement & Résumé
Publicité
- Licence:
- Perl Artistic License
- Prix:
- FREE
- Nom de l'éditeur:
- Sam Varshavchik
- Site Internet de l'éditeur:
- http://www.courier-mta.org/maildrop/
NET :: CIDR Mots clés
NET :: CIDR La description
Manipuler IPv4 / IPv6 NetBlocks dans la notation CIDR NET :: CIDR est un module PERL contenant des fonctions qui manipulent des listes de NetBlocks IP exprimées dans la notation de la CIDR. Les fonctions NET :: CIDR gérent les adresses IPv4 et IPv6. @ Cidr_list = Net :: CIDR :: Plage2CIDR (@Range_List); chaque élément de @Range_List est une chaîne "Démarrer-finition", où "Démarrer" est le premier Adresse IP et "Terminer" est la dernière adresse IP. Plage2CIDR () convertit chaque gamme en un NetBlock CIDR équivalent. Il renvoie une liste de NetBlocks sauf dans le cas où il n'est donné qu'un seul paramètre et est appelé dans le contexte scalaire.Synopsis Utilisation de Net :: CIDR; utiliser net :: CIDR ': tout'; Imprimer Rejoignez ("\ n", NET :: CIDR :: Range2CIDR ("192.68.0.0-192.68.255.255", "10.0.0.0-10.3.255.255"))). "\ n"; # # Production ci-dessus: # 192.68.0.0/16 # 10.0.0.0.0/14 IMPRIMER JOIN ("\ N", NET :: CIDR :: Range2Cidr ("Dead: Beef :: - Dead: Beef: FFFF: FFFF: FFFF: FFFF: FFFF: FFFF "))). "\ n"; # # Production d'en haut: # # morte: boeuf :: / 32 imprimer rejoindre ("\ n", net :: CIDR :: Range2CIDR ("192.68.1.0-192.68.2.255"))). "\ n"; # # Sortie ci-dessus: # # 192.68.1.0/24 # 192.68.2.0/24 Imprimer Rejoignez ("\ N", NET :: CIDR :: CIDR2Range ("192.68.0.0/16")). "\ n"; # # # Sortie d'en haut: # 192.68.0.0-192.68.255.255 Impression Rejoignez ("\ N", NET :: CIDR :: CIDR2Range ("Dead :: Beef :: / 46")). "\ n"; # # Production d'en haut: # # morte: boeuf :: - Dead: Beef: 3: FFFF: FFFF: FFFF: FFFF: FFFF @List = ("192.68.0.0/24"); @ list = net :: CIDR :: CIDRADD ("192.68.1.0-192.68.1.255", @List); Imprimer JOIN ("\ N", @List). "\ n"; # # # Sortie ci-dessus: # 192.68.0.0/23 Imprimer Rejoignez ("\ n", NET :: CIDR :: CIDR2OCTEAUTE ("192.68.0.0/22")). "\ n"; # # Production d'en haut: # 192.68.0 # 192.68.1 # 192.68.1 # 192.68.2 # 192.68.3 Imprimer Rejoignez ("\ N", NET :: CIDR :: CIDR2OCTEAUTE ("morte ::0 ::/46") ). "\ n"; # # Production d'en haut: # # morte: boeuf: 0000 # mort: boeuf: 0001 # morts: boeuf: 0002 # morts: boeuf: 0003 @List = ("192.68.0.0/24"); Imprimer Net :: CIDR :: CIDRLOIPUP ("192.68.0.12", @List); # # Production d'en haut: # 1 @List = Net :: CIDR :: addr2cidr ("192.68.0.31"); imprimer rejoindre ("\ n", @List); # # # De sortie ci-dessus: # 192.68.0.31/32 # 192.68.0.30/31 # 192.68.0.28/30 # 192.68.0.24/29 # 192.68.0.16/28 # 192.68.0.0/27 # 192.68.0.0/26 # 192.68.0.0/25 # 192.68.0.0/24 # 192.68.0.0/23 # Imprimer Net :: CIDR :: Addrandmask2CIDR ("195.149.50.61", "255.255.255.248"). "\ N"; # # Production d'en haut: # 195.149.50.56/29 Exigences: · Perl
NET :: CIDR Logiciels associés