Perl getprotoent()函數

perl getprotoent()函數，getprotoent()函數學習例子，getprotoent()函數實例代碼，getprotoent()函數教學等

語法

getprotoent

定義和用法

從列表中返回下一個項目的有效協議:

($name, $aliases, $protocol_number)

返回值

• 在標量上下文的錯誤返回undef，否則協議的名稱。

• 空列表，在列表上下文中的錯誤協議記錄 (name, aliases, protocol number)

實例

試試以下例子:

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


while(($name, $aliases, $protocol_number) = getprotoent()){
   print "Name = $name\n";
   print "Aliases = $aliases\n";
   print "Protocol Number = $protocol_number\n";
}