Perl getprotobybyname 函数

• 

  描述

  getprotobybyname 此函数在标量上下文中将协议NAME转换为其对应的编号，在列表上下文中将其协议编号和相关信息转换为：（$name，$aliases，$protocol_number）
• 

  句法

  以下是此函数的简单语法-

  
  getprotobyname NAME
  

• 

  返回值

  此函数对错误返回undef，否则返回标量上下文中的协议编号，并在列表上下文中返回错误协议记录上的空列表（名称，别名，协议编号）。
• 

  示例

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

   
  ($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