Code schlanker machen? - #119779 (Allgemeines zu Perl)

Beeboop

2009-03-24 21:59

User since
2009-03-23
4 Artikel
BenutzerIn
[default_avatar]

Hallo,
da ich ja ein Newbie in Perl bin habe ich mir natürlich hier und da ein bißchen Code zusammenkopiert, der dann seine Aufgabe erfüllte, wie diesen hier

Code: (dl )

1
2

my $addr = join(".", unpack("C4", (gethostbyname("$name"))[4]));
print ("$addr1\n");

Ich werde den anderen benutzen, wobei er mir wie der andere auch nicht ganz klar ist

Code: (dl )

use Net::hostent;
use Socket;

my $h = gethost($name)
    or die 'Could not resolve host name';
my $addr1 = inet_ntoa($h->addr);
print "$addr1\n";

Wenn ich es richtig habe, benutze ich dadurch cpan-Module aber was bedeutet

Code: (dl )

use Net::hostent;
use Socket;
[code]
und


[code]
my $addr1 = inet_ntoa($h->addr);

Danke an alle die mir antworten