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