Perl getprotobyname用法及代码示例

描述

该函数将协议NAME 转换为标量上下文中的对应编号，以及列表上下文中的编号和关联信息：($name, $aliases, $protocol_number)

用法

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

getprotobyname NAME

返回值

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

示例

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

#!/usr/bin/perl

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

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

当上面的代码被执行时，它会产生下面的结果——

Name = tcp
Aliases = TCP
Protocol Number = 6