2010-09-21 1 views
5

Quelqu'un a-t-il un exemple en Perl de la façon dont je peux calculer l'IP de diffusion à partir d'une adresse IP et d'un masque de réseau?Comment puis-je calculer l'IP de diffusion à partir d'une adresse IP et d'un masque de réseau en Perl?

+2

Downvoter: Veuillez fournir une raison. Les nouveaux utilisateurs n'apprendront jamais si vous ne leur dites pas ce qu'ils font mal. Il suffit de réduire la taille d'un utilisateur de 1 rep pour ne pas décourager les nouveaux utilisateurs d'utiliser SO. – Aren

+1

Ce n'était pas moi, mais c'est une question qui est très facile d'obtenir des réponses en allant à http://search.cpan.org et en entrant un terme de recherche comme "adresse IP" ou "netmask". – Ether

+0

Je suis d'accord avec vous thx pour l'aide, je suis vraiment nouvel utilisateur et juste poser des questions sur l'exemple, encore une fois thx – shulus

Répondre

7

Cela peut être fait avec les modules CPAN Net::IP et Net::Netmask:

my $ip = Net::IP->new('192.168.1.1'); 
my $block = Net::Netmask->new('192.168.1.1'); 

print "netmask: ", $ip->mask(), "\n"; 
print "broadcast: ", $block->broadcast(), "\n"; 
+0

Ether c'est exemple très simple, désolé de ma question – shulus

7

Pourquoi ne pas utiliser des modules de CPAN. Par exemple :

my $ip = NetAddr::IP->new('124.2.4.6', '255.255.255.0'); 
print $ip->broadcast(); 
+0

NetAddr :: IP a été mon goto pour tout ce qui concerne IP depuis un moment maintenant; il gère tout. – Oesor

Questions connexes