getprotobyname NAME |
標量上下文中協議名稱翻譯成對應的號碼,和它的號碼和相關信息在列表環境中:
($name, $aliases, $protocol_number)
在標量上下文undef上的錯誤,否則返回協議號。
空列表,在列表上下文中的錯誤協議記錄 (name, aliases, protocol number)
試試下麵的例子:
#!/usr/bin/perl
#by www.gitbook.net
($name, $aliases, $protocol_number) = getprotobyname("tcp");
print "Name = $name\n";
print "Aliases = $aliases\n";
print "Protocol Number = $protocol_number\n";
It produces following result
Name = tcp
Aliases = TCP
Protocol Number = 6