Perl-gethostbyname
提供:Dev Guides
Perl gethostbyname関数
説明
この関数は、システムの名前解決サービスにアクセスし、次のようにタイプADDRTYPEのホストADDRの情報のリストを返します-($ name、$ aliases、$ addrtype、$ length、@addrs)
@addrs配列には、パックされたバイナリアドレスのリストが含まれています。 スカラーコンテキストでは、ホストアドレスを返します。
構文
以下は、この関数の簡単な構文です-
gethostbyname NAME
戻り値
この関数は、エラーの場合はundefを返し、そうでない場合はスカラーコンテキストのホスト名を返し、エラーの場合は空のリストを返し、そうでない場合はリストコンテキストのホストレコードを返します。
例
以下は、その基本的な使用法を示すコード例です-
#!/usr/bin/perl
use Socket;
($name, $aliases, $addrtype,
$length, @addrs) = gethostbyname "amrood.com";
print "Host name is $name\n";
print "Aliases is $aliases\n";
上記のコードが実行されると、次の結果が生成されます-
Host name is amrood.com
Aliases is