Perl getprotobynumber 函数

描述

此函数将协议 NUMBER 转换为标量上下文中的相应名称，以及列表上下文中的名称和关联信息：($name, $aliases, $protocol_number)。

语法

此函数的简单语法如下 −

getprotobynumber NUMBER

返回值

此函数返回错误时的未定义值，否则返回标量上下文中的协议号，以及错误时的空列表协议记录（名称，别名，协议号）列表上下文。

示例

以下示例代码显示了基本用法 −

#!/usr/bin/perl

($name, $aliases, $protocol_number) = getprotobynumber(6);

print "Name = $name\n";
print "Aliases = $aliases\n";
print "Protocol Number = $protocol_number\n";

执行以上代码时，将生成以下结果 −

Name = tcp
Aliases = TCP
Protocol Number = 6