情報の取得

現在、Perlで掲示板をつくっています。投稿者のIPアドレスを取得できるようにしているのですが、IPアドレスやブラウザ情報だけでなく、プロバイダ情報なども取れるようにしたいのです。
Perlでプロバイダ情報の取得などできるのでしょうか。（環境変数では無理なようですが）どなたかお教えください。

No.1 ベストアンサー 回答者： natsuki_tk 回答日時： 2004/02/20 14:03

IPアドレスから逆引きして推定することはできます。

ただし、必ずわかるわけではありませんし、
その判定ルーチンは自作する必要があります。

#どなたかが公開されている可能性はありますから、
#検索されてみてはいかがでしょうか？

No.4 回答者： chausuyama 回答日時： 2004/02/25 04:45

http://thunder.prohosting.com/ie400/

参考URL：http://thunder.prohosting.com/ie400/

No.3 回答者： mochi-mochi 回答日時： 2004/02/24 08:52

携帯かどうかは判定がつきますが、相手の回線がADSLかダイアルアップか光かとかは、判定できないとおもいます。

あらかじめわかっていれば、プロバイダーの情報から
YahooBBがついていればADSLとかは個別に判定することはできるかもしれません。

No.2 回答者： mochi-mochi 回答日時： 2004/02/22 12:46

質問の意味を取り違えていたらすみません。

環境変数Iｐアドレスから「逆引き」で
ドメイン情報を得ることができます。
下の４行を貼り付けてみてください。
$hostにドメインが代入されます。
ただしこのgethostbyaddr関数さえも禁じているところもあります。niftyなんかはだめかもしれません。

$ad=$ENV{'REMOTE_ADDR'};
#まず環境変数からIpアドレスを取ります
$host=gethostbyaddr(pack('c4',split(/\./,$ad)),2);
#それをカンマできりなおして、３２ビットに変換して関数に入れる。（こう書いている本人も実はよくわかっていない。）

この回答への補足

この方法でOKでした。ありがとうございます。
ついでといっては何ですが、回線の種別などを知る関数などはないでしょうか？相手側の回線状況に応じて表示情報を変えたりできると便利なのですが・・・

補足日時：2004/02/23 18:21