Perl getprotobyname()函数

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

语法

getprotobyname NAME

定义和用法

标量上下文中协议名称翻译成对应的号码，和它的号码和相关信息在列表环境中：

($name, $aliases, $protocol_number)

返回值

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

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

实例

试试下面的例子:

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

($name, $aliases, $protocol_number) = getprotobyname("tcp");

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