Funzione getpeername Perl
Descrizione
Questa funzione restituisce l'indirizzo del socket compresso dell'host remoto collegato a SOCKET.
Sintassi
Di seguito è riportata la semplice sintassi per questa funzione:
getpeername SOCKET
Valore di ritorno
Questa funzione restituisce undef in caso di errore indirizzo socket altrimenti compresso in contesto scalare.
Esempio
Di seguito è riportato il codice di esempio che mostra il suo utilizzo di base, qui SOCK è l'ID socket del socket peer -
#!/usr/bin/perl
use Socket;
$hersockaddr = getpeername(SOCK);
($port, $iaddr) = sockaddr_in($hersockaddr);
$herhostname = gethostbyaddr($iaddr, AF_INET);
$herstraddr = inet_ntoa($iaddr);