En primer lugar, PeerAddr debe ser IP address o el nombre de anfitrión del servidor, de que escucha el puerto 15650, no trayectoria al programa, como
mi $sock = nuevo IO:: Zócalo:: INET (=> “192.168.1.1” de PeerAddr, => “15650” de PeerPort, => Proto “tcp ");