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
