Hallo, mal ne kleine Frage zu einem Syntax über den ich gerade gestolpert bin.

for ($i=1; $i<5 ;$i++)
{

$test[@test] = "$i";
}


Leider habe ich das in dieser Form noch nicht gefunden. test ist nun eine Liste und eine Variable zugleich? Wozu dient das? Gibts das auch mit Hashes?

Vielen Dank

fabmo

eine liste gibt im scalaren kontext die anzahl seiner elemente zurück (vorsicht!
nicht den letzten index).

Sowohl bei @test als auch bei $test[] handelt es sich im Prinzip um die selbe Variable. Allerdings wird einmal auf den ganzen Array @test und das andere mal auf ein einzelnes Element des Arrays - z.B. $array[5] - zugegriffen.

In dem von dir geposteten Beispiel wird die Sache noch etwas komplizierter (und IMHO vom Stil her schlecht). Nehmen wir uns erst einmal @test vor. Das ist ein Array. Normalerweise würde dieser eine Liste seiner Elemente zurückgeben. Nun ist es aber in Perl so, dass jede Funktion, Variable, etc. weiß, was man von ihr erwartet. In diesem Speziellen Fall, erwartet perl an dieser Stelle keine Liste, sondern einen Scalar - also einen einzelnen Wert. Wenn man einen Array in so einem "scalaren Kontext" setzt, liefert er keine Liste mehr zurück, sondern die Anzahl seiner Elemente. Diese Zahl wird jetzt als Index für $test[] verwendet. Da die Zahl der Elemente eines Arrays im Normalfall dem nächsten undefinierten (leeren) Index entspricht (Arrays fangen normalerweise bei null und nicht bei einsan zu zählen) wird mit diesem Code also der Array "test" mit den Zahlen von eins bis fünf gefüllt. Die Anführungszeichen um $i erfüllen dabei soweit ich sehen kann keinen Sinn.

Schlechter Stil ist das deshalb, weil ein Array in Perl nicht unbedingt mit dem Index null beginnen muss. Robuster währe folgendes:

Taulmarill+2007-09-26 16:09:13--

Schlechter Stil ist das deshalb, weil ein Array in Perl nicht unbedingt mit dem Index null beginnen muss.

zwar ist hier push tatsächlich die lösung der wahl, jedoch kann man in modernen perl-versionen
("As of release 5 of Perl") die indizierung nur noch selbst verändern und nicht global, das
heisst, wenn man in der datei, in der sich der code befindet, sowas nicht macht (also nicht
$[ verändert), kann einem nichts passieren.

Okay habe ich verstanden....trotzdem merkwürdig.

Aber schonmal vielen Dank.

statt

könnte man einfacher auch schreiben:

selbst

wäre noch weit einfacher, kürzer und verständlicher. ich glaube nicht das es bis 5 geht, denn im schleifenkopf steht ja $i < 5;

Das ist aber echt trickreich.. Oder ist das ganz übliche Perl Syntax?

Da ich im Moment mir noch alle Informationen aus dem Internet zusammensuche überlege ich mal in ein Buch investiere. Kennt jemand eins welches wirklich emfehlenswert ist? Ich dachte da an dieses Perl Tk kurz und gut.
aber das behandelt wahrscheinlich nur TK oder?

Schonmal im Vorraus Danke.

Das was lichtkind gezeigt hat ist übliche Perl Syntax...

Ein paar Buchempfehlungen.

klar ist perl/tk über tk. wenn du ein gutes perl buch suchst schau mal in unsre wiki da sind empfehlungen oder sag genauer was du suchst.

hallo!
ich persönlich würde dir als lehrbuch PERL in 21 Tagen von Laura Lemay - Markt & Technik verlag empfehlen. ich habe mir schon eine ganze reihe von perl lehrbüchern angesehen und finde, dass dieses buch am besten einen überblick über perl geben kann. wie gesagt, es ist kein nachschlagewerk sondern ein richtiges buch zum lernen mit vielen übungsaufgaben+lösungen.

mit 800 seiten bietet dieses buch auch keine oberflächliche einführung in perl. es werden sogar referenzen ziemlich intensiv behandelt und zum schluss eine kleine einführung in objektorientiertes perl gegeben. genau bei diesen dingen wird meistens erst in fortgeschrittener literatur eingegangen, bei der dann eventuell erklärungen ein wenig zu kurz kommen und schon viel wissen vorrausgesetzt wird.