Restituisce l'indirizzo compattato sockaddr di questa estremità della connessione SOCKET nel caso non si conosca l'indirizzo, visto che si hanno diversi differenti IP a cui la connessione potrebbe partecipare.

    use Socket;
    $miosockaddr = getsockname(SOCK);
    ($porta, $mioind) = sockaddr_in($miosockaddr);
    printf "Connesso a %s [%s]\n",
       scalar gethostbyaddr($mioind, AF_INET),
       inet_ntoa($mioind);