Die IP-Adresse meines Routers...: ...in der Kommandozeile angezeigt - #37196 (Netzwerkprogrammierung und Netzwerke mit Perl)

nepos

2006-03-30 16:35

User since
2005-08-17
1420 Artikel
BenutzerIn

Code (perl): (dl )

use strict;
use Socket;

print inet_ntoa(gethostbyname('whatismyip.com') ."\n";

Das sollte einen ganz normalen DNS-Request vom System ausloesen und dir die IP-Adresse zurueckliefern.
Bei deiner Variante siehst du natuerlich auch noch, ob das System mit dem Namen auch antwortet ;)