O'Reilly logo

Programmieren mit Perl by Jon Orwant, Tom Christiansen, Larry Wall

Stay ahead with the world's most comprehensive technology and business learning platform.

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, tutorials, and more.

Start Free Trial

No credit card required

Net::hostent

use Socket;
use Net::hostent;

print inet_ntoa(gethost("www.perl.com")->addr);  # gibt 208.201.239.50 aus
printf "%vd", gethost("www.perl.com")->addr;     # das gleiche
print gethost("127.0.0.1")->name;                # gibt localhost aus

use Net::hostent ':FIELDS';
if (gethost($name_or_number)) {
    print "Der Name ist $h_name\n";
    print "Aliases sind $h_aliases\n";
    print "Die Adressen sind",
        join ", " => map { inet_ntoa($_) } @h_addr_list;
}

Die Standardexporte dieses Moduls überschreiben die Core-Funktionen gethostbyname und gethostbyaddr und ersetzen sie durch Versionen, die ein Net::hostent-Objekt (oder undef bei einem Fehler) zurückgeben. Das Objekt besitzt Attribut-Zugriffsmethoden, die das gleichnamige Strukturfeld der struct hostent aus netdb.h zurückgeben: ...

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, interactive tutorials, and more.

Start Free Trial

No credit card required