|
Thema Arrays
Mittwoch, 21.2.2007, 13:40:30 Uhr
chomp() in Perl
Im Gegensatz zu chop() entfernt chomp() nur dann das letzte Zeichen eines Skalars (Strings) oder Arrays (Liste), wenn dieses Zeichen gleich dem Zeichen ist, das in $/ gesetzt ist.Hört sich jetzt etwas verquert an, also im Klartext:
In $/ ist das Zeichen enthalten, das als INPUT_RECORD_SEPARATOR bekannt ist. Normalerweise ist das das \n bzw. der Zeilenumbruch. Und jetzt kommt man der Sache schon näher: Es wird, wenn vorhanden, jeder Zeilenumbruch am Ende eines Skalars oder eines Arrayelements gelöscht.
Beispiel:
Weiterlesen...
Mittwoch, 21.2.2007, 13:11:12 Uhr
chop() in Perl - Letztes Zeichen eines Skalars oder Arrays entfernen
Der Befehl chop() entfernt das letzte Zeichen eines Skalars oder eines Arrays. Beispiel:
$t="Hansi";
$weg=chop($t);
print "Neu: $t\nAbgeschnitten: $weg";
|
Ausgabe:
Neu: Hans
Weiterlesen...
Montag, 19.2.2007, 08:50:42 Uhr
split() - Zeichenketten zerlegen in Perl
Der Befehl split() ist eine mächige Funktion, mit der man Skalare in Arrays zerlegen kann.
Syntax:
@array=split(/$trennungszeichen/,$skalar);
Weiterlesen...
Freitag, 2.2.2007, 13:38:21 Uhr
Doppelte Einträge aus Array entfernen mit Perl
Ich hab mir da mal eine Funktion geschrieben, die aus einem Array schnell alle doppelten Werte herausfiltert.
Schnell bedeutet übrigens: Ich habe verschiedene Möglichkeiten auf Ihre Schnelligkeit hin getestet und diese war die Schnellste...
Code:
sub del_double{ #Parameter: @liste, die aussortiert werden soll
my %all;
grep {$all{$_}=0} @_;
return (keys %all);
}
|
Weiterlesen...
Dienstag, 30.1.2007, 11:52:33 Uhr
reverse() in Perl
Der Befehl reverse dreht die Reihenfolge eines Arrays um, d.h. das erste Element wird das letzte und so weiter.
Syntax
@array=reverse(@array);
Beispiel:
Weiterlesen...
Montag, 29.1.2007, 16:40:52 Uhr
Splice() in Perl
Der Befehlt Splice() ist ein sehr mächtiger Befehl in Bezug auf die verarbeitung von Arrays.
Syntax:
@LIST = splice(@ARRAY, OFFSET, LENGTH, @REPLACE_WITH);
Mit Splice kann man Beliebig viele Elemente eines Arrays hinzufügen, ersetzen oder löschen.
Weiterlesen...
Montag, 29.1.2007, 16:07:47 Uhr
Pop in Perl
Der Befehl pop() löscht den letzten Eintrag eines Arrays und gibt ihn zurück.
Beispiel:
@a=("hans","franz");
$a=pop(@a);
print $a;
|
Weiterlesen...
Montag, 29.1.2007, 16:03:33 Uhr
Shift in Perl
Der Shift-Befehl in Perl gibt als Ergebnis den ersten Eintrag eines Arrays zurück und entfernt diesen aus dem Array.
Beispiel:
Weiterlesen...
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;
|
Weiterlesen...
Montag, 29.1.2007, 13:09:24 Uhr
unshift in Perl
Die Funktion unshift kann dazu verwendet werden, an den Beginn eines Arrays neue Werte einzufügen.
Im Gegensatz zu push (@array,$wert), das den neuen Wert immer an das Ende fügt, kann man mit dem Befehl unshift ganz einfach neue Werte nach vorne schreiben.
Beispiel:
@a=("hans");
unshift(@a,"peter");
unshift (@a,"fritz");
print @a;
|
Weiterlesen...
|
RSS-Feed