Fonction Perl getnetbyaddr

La description

Cette fonction renvoie les informations pour le réseau spécifié par ADDR et tapez ADDRTYPE dans un contexte de liste: ($ name, $ aliases, $ addrtype, $ net)

Syntaxe

Voici la syntaxe simple de cette fonction -

getnetbyaddr ADDR, ADDRTYPE

Valeur de retour

Cette fonction renvoie undef en cas d'erreur sinon Adresse réseau dans un contexte scalaire et liste vide en cas d'erreur sinon Enregistrement réseau (nom, alias, type d'adresse, adresse réseau) dans un contexte de liste.

Exemple

Voici l'exemple de code montrant son utilisation de base -

#!/usr/bin/perl

use Socket;

$iaddr = inet_aton("127.1"); # or whatever address
($name, $aliases, $addrtype, $net)  = getnetbyaddr($iaddr, AF_INET);

print "Name = $name\n";
print "Aliases = $aliases\n";
print "Addrtype = $addrtype\n";
print "Net = $net\n";

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

Name = default
Aliases = 
Addrtype = 2
Net = 0