Fonction getpeername Perl

La description

Cette fonction renvoie l'adresse de socket compressée de l'hôte distant connecté à SOCKET.

Syntaxe

Voici la syntaxe simple de cette fonction -

getpeername SOCKET

Valeur de retour

Cette fonction renvoie undef en cas d'erreur, sinon l'adresse de socket compressée dans un contexte scalaire.

Exemple

Voici l'exemple de code montrant son utilisation de base, ici SOCK est l'ID de socket du socket pair -

#!/usr/bin/perl

use Socket;

$hersockaddr    = getpeername(SOCK);
($port, $iaddr) = sockaddr_in($hersockaddr);
$herhostname    = gethostbyaddr($iaddr, AF_INET);
$herstraddr     = inet_ntoa($iaddr);