perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 20
Click for quality!




11.02.2012 / 23:14

Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home


PERLscripts


PHPscripts


JAVAscripts


Hilfreiches


Links2www


Newscenter


Community


Interna




Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


BeitragArrays Indexes
Seitenanfang
Hallo!

Bin ein ziemlicher Perl Anfänger und habe mit den Arrays folgendes Problem:

Habe ein Perl Skript geschrieben dass IP Adressen mittels net::ping anpingen soll. Die Adressen sind in einer Textdatei gespeichert die ausgelesen wird und in ein Array übergeben wird.

Nun weiß ich aber nicht, wie ich "fortlaufende Indiezies" deklarieren soll? (Siehe if Abfrage)
Das Prog. soll praktisch bei Index Null anfangen und dann im Array hochzählen..

Wie bekomm ich das hin?

Danke für eure Hilfe !

--------------------------------------
if ($p->ping($hosts_[0]))
{
print "$hosts[0] ist via tcp erreichabar\n" ;
}
else
{
print "$hosts[0] ist via tcp unerreichbar\n";
}
----------------------------------------------

Datum: 18.10.2005-14:53

Beitragre: Arrays Indexes
Seitenanfang
for my $host (@hosts)
{
# ...aktionen pro element von @hosts
}

oder

for(my $i = 0; $i < scalar @hosts; $i++)
{
print $hosts[$i];
}

scalar @hosts liefert dir die gesamtzahl der einträge. da arrays bei 0 beginnen ist das letzte element also immer
scalar @hosts - 1

Datum: 18.10.2005-15:30

Beitragre: Arrays Indexes
Seitenanfang
Hi,


foreach(@hosts)
{
if ($p->ping($_)
{
print "$_ ist via tcp erreichabar\n" ;
}
else
{
print "$_ ist via tcp unerreichbar\n";
}
}

-uw

Datum: 18.10.2005-21:38

Beitragre: Arrays Indexes
Seitenanfang
Danke für die Antworten..
Jetzte funktioniert das ganze !

Datum: 18.10.2005-22:25

-






-
-