Perl getnetbyaddr()函數

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

語法

getnetbyaddr ADDR, ADDRTYPE

定義和用法

在列表上下文中，返回指定的網絡地址和類型ADDRTYPE信息：

($name, $aliases, $addrtype, $net)

返回值

• 在標量上下文的錯誤返回undef，否則網絡地址。

• 在列表上下文空列表上的錯誤，否則網絡記錄 (name, aliases, address type, network address).

例子

試試以下例子：

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

use Socket;

$iaddr = inet_aton("127.1"); # or whatever address
($name, $aliases, $addrtype, $net)  = getnetbyaddr($iaddr, AF_INET);

print "Name = $name\n";
print "Aliases = $aliases\n";
print "Addrtype = $addrtype\n";
print "Net = $net\n";