getprotobynumber NUMBER |
在標量上下文轉換協議到其相應的名稱,和它的名字和相關的信息列表中的內容:
($name, $aliases, $protocol_number)
在標量上下文上的錯誤返回undef,否則返回協議號。
空列表,在列表上下文中的錯誤協議記錄 (name, aliases, protocol number)
試試以下例子:
#!/usr/bin/perl
#by www.gitbook.net
($name, $aliases, $protocol_number) = getprotobynumber(6);
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