$t="Das hier ist ein Testtext";
@array=split(/ /,$t); foreach (@array){print "$_\n";}
Ausgabe:
Das
Hier
ist
ein
Testtext
Dem Array wurden also alle einzelnen Wörter zugewiesen. Natürlich kann man als Trennzeichen auch jedes andere Zeichen verwenden, ja sogar ganze Wörter sind möglich.
Wozu man das braucht? Klar, könnt ich jetzt sagen, zum Teilen von Skalaren in Arrays... aber nun mal im Ernst: Angenommenerweise, man hat eine Zeichenfolge wie die Folgende:
$t="Das ist ein Testtext. Er wird verwendet, um etwas zu testen.";
@saetze=split(/\./,$t); printjoin("\n",@saetze);
Ausgabe:
Das ist ein Testtext
Er wird verwendet, um etwas zu testen
Es werden also alle Sätze einzeln aufgeteilt, oder besser gesagt: Es erfolgt ein Split bei jedem Punkt.
Übrigens:
Die Zeichen, die als Trennungszeichen genommen werden, werden nicht mit in das Ergebnis aufgenommen. Man sieht das gut am letzten Beispiel, da fehlen an den Satzenden die Punkte.
Es gibt da noch ein paar Besonderheiten zu split()
Ein split('',$skalar) zum Beispiel teilt den Skalar in seine einzelnen Buchstaben bzw. Zeichen.
Wieso sollte klar sein, wenn nicht, dann hier die Erklärung:
Das split(/:+/,$) teile den Skalar nach jedem einzelnen oder mehrfach hintereinander auftauchenden Doppelpunkt, in diesem Fall also dem Trenner des Vornamens, Nachnamens und Ortes.
Und noch etwas fällt mir gerade noch dazu ein: split verwendet, wenn sonst nichts angegeben wird, die Spezialvariable $_.
In der foreach-Schleife wird ja das $_ jeweils mit dem aktuellen Array-Wert belegt, das dann gesplittet wird.
Ob man das so verwendet ist Geschmackssache, es gibt auch Leute, die lieber eine separate Variable für einen Schleifendurchlauf verwenden (der Übersicht wegen).
Kommentare zum Beitrag "split() in Perl - Zeichenketten teilen"
Kommentar von Fabrizio Staudinger
Sehr gelungene Übersicht, die das gröbste knapp aber super verständlich erklärt, um vor allem Laien wie mir, den Einstieg zu erleichtern.
Die Seite ist im Allgemeinen sehr hilfreich und hat mir schon oft geholfen.
RSS-Feed