Artikel im Internet unter http://www.hidemail.de/blog/push-perl.shtml.
Montag, 29.1.2007, 13:15:08 Uhr

push in Perl

Der Befehl push fügt einem Array am Ende einen oder mehrere neue Werte hinzu, ein Array kann also mit dem push-Befehl erweitert werden. Diese neuen Werte werden, wie gesagt, am Ende des Arrays hinzugefügt. Möchte man am Anfang eines Arrays einen neuen Wert einfügen, kann man den Befehl unshift verwenden.

Beispiel zu push:

@a=("hans");
push(@a,"peter"); # Den Eintrag peter hinzufügen
push (@a,"fritz"); # Den Eintrag fritz hinzufügen
print @a;

Ausgabe: hans peter fritz

Übrigens funktioniert das auch mit mehreren neuen Werten oder mit kompletten anderen Arrays, aber Vorsicht, hier wird dann "am Stück" eingefügt, also in der Reihenfolge, die angegeben wird (anschauen bringt glaub ich mehr als meine Beschreibung...):

@a=("hans");
push(@a,("peter","fritz"));
print @a;

Ausgabe: hans peter fritz

@a=("hans");
@b=("peter","fritz");
push(@a,@b);
print @a;

Ausgabe: hans peter fritz

Übrigens
Man kann, wie bei vielen Befehlen in Perl, die Klammern auch weglassen.
Es funktioniert also auch ein

push @a,$b;
oder
push @a,"WERT";

Was man verwendet, bleibt jedem selbst überlassen...

Der umgekehrte Befehl zu push

Der Befehl, der das Umgekehrte bewirkt wie push, der also ein Element eines Arrays entfernt, ist der pop-Befehl.
Genauer gesagt entfernt der pop-Befehl den letzten Eintrag bzw. Wert eines Arrays.

@a=();
push (@a,"test");
push (@a,"Neu");
$wert = pop (@a);
print @a;

Dieser kleine Codeabschnitt fügt dem Array @a erst den Wert "test" hinzu, dann den Wert "Neu", der dann aber sofort wieder entfernt wird. Die Ausgabe lautet deshalb "test".

Artikel im Internet unter http://www.hidemail.de/blog/push-perl.shtml.