home / Web Tips Library / Perl / IPアドレスからホスト名を取得する

IPアドレスからホスト名を取得する

gethostbyaddr関数を使用して IP アドレスからホスト名を取得する事が出来ます。下記サンプルでは $ip にループバックアドレス（127.0.0.1）が代入されていますので、$host には自ホスト名が代入されます。

$ip = "127.0.0.1";

$host = gethostbyaddr(pack("C4",split(/\./,$ip)),2);

print $host;