Hostname auflösen

[Sebastian Will]

Hi ihr,
ich weiß, gab's schonmal die Frage, aber das Archiv hat meine Frage nicht ausreichend beantwortet.
Problem: Auflösen einer IP in einen Hostname.
Archivlösung: nslookup benutzen.
Frage: Geht das nicht auch ohne nslookup? Durch eine direkte Anfrage an irgendeinen Server (Denic vielleicht?) und wenn ja, wie genau macht man das? An Socketprogrammierung hab ich mich bis jetzt noch nicht rangewagt, für Hilfestellungen wär ich dankbar.

So, gute Nacht
Sebastian Will

[Frank S.]

Hi Sebastian!

Hier zwei Auszüge aus Scripts, die ich benutze:

#ermitteln der IP einer Domain:
$name = "www.teamone.de";
($a,$b,$c,$d) = unpack("C4",gethostbyname($name));
print "Name:$name Host:$a.$b.$c.$d\n";

#ermitteln des Namens aus IP-Adresse:
($host) = (gethostbyaddr(pack("C4", split(/./, $ENV{'REMOTE_ADDR'})), 2))[0];

Gruß Frank