Perl を使用して、IPv4/IPv6 アドレスからホスト名を取得する際に必要となる事項などを、以下にまとめておきます。 IPv4 アドレスについての正規表現 IPv6 アドレスの展開 ホスト名の取得 まず IPv4 アドレスについて。 IPv4 アドレスの一般的な形式である xxx.xxx.xxx.xxx、この他、IPv4 互換 IPv6 アドレス (::xxx.xxx.xxx.xxx) および IPv4 射影 IPv6 アドレス (::ffff:xxx.xxx.xxx.xxx) をマッチングするようにしてみました。 /^(?:::(?:f{4}:)?)?((?:0*(?:2[0-4]\d|25[0-5]|[01]?\d\d|\d)\.){3}0*(?:2[0-4]\d|25[0-5]|[01]?\d\d|\d))$/i $1 に xxx.xxx.xxx.xxx の部分だけが入ります。