Perl getprotobynumber()函数

perl getprotobynumber()函数，getprotobynumber()函数学习例子，getprotobynumber()函数实例代码，getprotobynumber()函数在线教程等

语法

getprotobynumber NUMBER

定义和用法

在标量上下文转换协议到其相应的名称，和它的名字和相关的信息列表中的内容：

($name, $aliases, $protocol_number)

返回值

• 在标量上下文上的错误返回undef，否则返回协议号。

• 空列表，在列表上下文中的错误协议记录 (name, aliases, protocol number)

实例

试试以下例子:

#!/usr/bin/perl
#by www.gitbook.net

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

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

It produces following result

Name = tcp
Aliases = TCP
Protocol Number = 6