PerlでIPアドレスを取得する方法

Perl5.6 or 5.8を使っております。
環境変数からIPの取得をするのは、CGIで動いている前提？ですが、
CGIでなくてperlスクリプトが単体で動作した場合に他の例えばサーバーのアドレスを知るにはどのようにしたらよいのでしょうか？
自アドレスはgethostbyaddrで取得できます。
REMOTE_ADDRの値を取得したいです。

No.1 ベストアンサー 回答者： BLUEPIXY 回答日時： 2005/07/24 12:54

$addr=(gethostbyname("www.***.ne.jp"))[4];

てな感じだと思います。
単体で動作した時に「REMOTE_ADDRの値を取得したい」
というのは意味がよくわかりません。