getnetbyname NAME |
在列表上下文中,返回的信息由名稱指定的網絡
($name, $aliases, $addrtype, $net)
在標量上下文的錯誤返回undef,否則返回網絡地址。
在列表上下文上的錯誤返回空列表,否則網絡備案中 (name, aliases, address type, network address).
試試以下例子:
#!/usr/bin/perl #by www.gitbook.net use Socket; ($name, $aliases, $addrtype, $net) = getnetbyname("loopback"); print "Name = $name\n"; print "Aliases = $aliases\n"; print "Addrtype = $addrtype\n"; print "Net = $net\n";