当前位置: 首页>>代码示例 >>用法及示例精选 >>正文


Perl getpeername用法及代码示例



描述

此函数返回连接到 SOCKET 的远程主机的打包套接字地址。

用法

以下是此函数的简单语法 âˆ'

getpeername SOCKET

返回值

此函数在错误时返回 undef,否则在标量上下文中打包套接字地址。

示例

以下是显示其基本用法的示例代码,这里的 SOCK 是对等套接字的套接字 ID âˆ

#!/usr/bin/perl

use Socket;

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

相关用法


注:本文由纯净天空筛选整理自 Perl getpeername Function。非经特殊声明,原始代码版权归原作者所有,本译文未经允许或授权,请勿转载或复制。