Perl getprotobynumber用法及代码示例

描述

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

用法

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

getprotobynumber NUMBER

返回值

此函数在错误时返回 undef，否则返回标量上下文中的协议编号和列表上下文中错误协议记录(名称、别名、协议编号)的空列表。

示例

以下是显示其基本用法的示例代码 -

#!/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