ip-adresse

[Klaus Mock]

Hallo,

wie kann ich mittels perl unter 2000 die ip-adresse meines rechners auslesen? gehe mittels dsl ins inet.

<cite>
use Socket;
use Sys::Hostname;
my $host = hostname();
my $addr = inet_ntoa(scalar gethostbyname($host || 'localhost'));
</cite>

Zu finden unter
perldoc -q "IP address"

Grüße
  Klaus

PS: Da hast es wohl sehr eilig gehabt, da Du so 'Nebensächlichkeiten' wie Anrede usw. vergessen hast;-)