Dieses wird mit der �s� Funktion getan, die entworfen worden ist, um die Weise nachzuahmen, die, Ersatz im Herausgeber des Textes VI gebildet wird. Hier wieder wird der Gleichoperator verwendet gebildet, und wieder, wenn er dann ausgelassen wird, wird Ersatz angenommen, mit dem variablen $_ stattgefunden zu haben.
Um von London durch London in der Zeichenkette $sntnce zu ersetzen verwenden wir den folgenden Ausdruck

$sntnce =~ s/london/London/

and to do the same thing with the $_ variable just
s/london/London/

Beachten, da� beide regelm��igen Ausdr�cke (London und London) durch eine Gesamtmenge von drei Schr�gstrichen umgeben werden. Zahl des gebildeten Ersatzes ist das Resultat dieses Ausdruckes, also irgendein ist sie 0 (falsch) oder 1 (zutreffend) in diesem Fall.

Perl Wahlen

Das folgende Beispiel ersetzt nur das erste Auftreten der Zeichenkette, und es kann mehr als eine solche Zeichenkette geben, die wir ersetzen m�chten. Der letzte Schr�gstrich wird von �g� gefolgt, um einen globalen Ersatz wie folgt zu bilden.

s/london/London/g

If we want to also replace occurrences of lOndon, lonDON, LoNDoN and so on then we could use
s/[Ll][Oo][Nn][Dd][Oo][Nn]/London/g
but an easier way is to use the i option (for "ignore case"). The expression
s/london/London/gi

will make a global substitution ignoring case. The i option is also used in the basic /.../ regular expression match.

Erinnern an Muster

Es ist n�tzlich, wenn wir an die Muster uns erinnern, die zusammengebracht worden sind, damit sie in der Zukunft wieder benutzt werden k�nnen. Es geschieht gerade, da� an alles, das in Klammern zusammengepa�t erh�lt, in den Variablen $1 erinnert wird,�, $9. Indem man das spezielle BEZ�GLICH Codes \ 1,� verwendet, k�nnen, \ 9 diese Zeichenketten im gleichen regelm��igen Ausdruck (oder im Ersatz) auch verwendet werden. uns zum Beispiel lassen cosider:

$_ = "Lord Whopper of Fibbing"; s/([A-Z])/:\1:/g; print "$_\n";

Er ersetzt jeden Versalienbuchstaben durch jene Buchstaben, die durch Doppelpunkte umgeben werden. Er druckt: L: ord: W: Zufuhrbeh�lter von: F: Ibbing. Alle Variablen von $1,�, $9 sind Read-only-Variablen; folglich kannst du nicht sie �ndern sich

Cosider das folgende Beispiel.

if (/(\b.+\b) \1/)
{
print "Found $1 repeated\n";
}

Dieses kennzeichnet irgendwelche der W�rter, die wiederholt werden. Jedes \ b stellt eine Wortgrenze und dar. + bringt irgendwelche der nicht leeren Zeichenketten, so \ b.+ \ b zusammenbringt alles zwischen mit zwei W�rterngrenzen zusammen. An dieses wird dann durch Klammern und f�r regelm��iges Ausdr�cke gespeichert wie \ 1 und f�r den Rest des Programms als $1 erinnert.

Die folgende Linie tauschen die ersten und letzten Buchstaben einer Linie in einem variablen $ _ aus:

s/^(.)(.*)(.)$/\3\2\1/

Der Anfang und das Ende der Linie werden durch ^ und $ zusammengebracht. Der erste Buchstabe ist gespeichertes in \ 1 Code, alles sonst bis zum letzten Buchstaben wird gespeichert im Code \ 2. welches im Code \ 3 gespeichert wird. Dann ist die vollst�ndige Linie ersetztes mit \ 3 und \ 1 um ausgetauscht.

Herauszufinden, nachdem ein Gleiches gefunden ist, kannst du das Variablen $ `benutzen und das $& und das $ ', das die spezielle ist Read-only-Variable, zum was vor, w�hrend und nach der Suche zusammengebracht wurde.

$_ = "Lord Whopper of Fibbing"; /pp/;

Alle folgenden Aussagen sind zutreffend. (Daran erinnern, da� eq ein Zeichenkettegleichheit Test. ist)

$` eq "Lord Wo"; $& eq "pp"; $' eq "er of Fibbing";

Bez�glich des Erinnerns an Muster ist es auch wert das Wissen das innerhalb der Schr�gstriche eines Gleichen, oder Variablen eines Ersatzes werden interpoliert.

$search = "the";
s/$search/xxx/g;

Diese Linie ersetzt xxx mit jedem Auftreten von ��. Wenn du jedes Vorkommen von ersetzen m�chtest �dort� dann, kannst du nicht den tun, der s/$searchre/xxx/verwendet, weil dieses als variables �$searchre� interpoliert wird. F�r dieses solltest du die variablen Namen in die lockigen Klammern einsetzen, damit der Code wird:

$search = "the";
s/${search}re/xxx/;

�bersetzung in Per

Buchstabe-durch-Buchstabe �bersetzung wird durch die tr Funktion erfolgt. Im folgenden Ausdruck wird jedes a mit e, jedem b mit d und c mit f im variablen $sntnce ersetzt. Der Ausdruck bringt die Zahl dem gebildeten Ersatz zur�ck.

$sntnce =~ tr/abc/edf/

Die meisten vom speziellen BEZ�GLICH der Codes sind nicht in der tr Funktion anwendbar. Uns zum Beispiel, hier betrachten lassen die Aussage Z�hlimpulse die Zahl den Sternchen, die im variablen $sntnce vorhanden sind und Speicher, die im variablen $count.

$count = ($sntnce =~ tr/*/*/);

However, the "-" is still used to mean "between". This statement converts $_ to upper case.

tr/a-z/A-Z/;

Keywords:perl tutorial, perl scripts, perl programming, active perl, perl download, blackberry perl, perl regular expressions, perl split, perl array, perl script page

HTML Quizes

XML Quizes