User since
2008-10-08
3
Artikel
BenutzerIn
Hi,
bin neu hier deshalb erstmal Hallo an alle.
Meine Frage betrifft reguläre Ausdrücke .. wie kann ich in Perl mehrzeilige Muster angeben?
also wie kann ich zb
a
b
c
d
e
alles was zwischen a und e steht erfassen? Hab gelesen man kann Dateien als einen String einlesen, damit müsste es ja gehen.
Wär super wenn mir einer helfen könnte.
Danke für die Mühe im Vorraus.
Gruß
acco
User since
2003-08-04
5870
Artikel
ModeratorIn
Vielleicht hilft dir sowas wie
while (<>) {
print if /^a$/ .. /^e$/;
}
weiter
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;
use strict; use warnings; Link zu meiner Perlseite
User since
2008-10-08
3
Artikel
BenutzerIn
Das hilft mir allerdings erstmal weiter.
So ähnlich wollt ichs auch probieren, aber da hab mich wohl irgendwie verwurstelt...
Jedenfalls danke für die schnelle Antwort.
Gruß
acco
User since
2008-10-08
3
Artikel
BenutzerIn
Hmmm, vielleicht war ich ein bißchen vorschnell.
Ich versuche mein Beispiel mal zu verkomplizieren:
bcd
a bcd e a b
c
d
e
b c d
Hier soll nun NUR text zwischen a und e verändert werden.
Also Ausgabe:
bcd
b c d
Geht das auch mit Schleifen?
Danke,
gruß
acco
User since
2005-08-17
1420
Artikel
BenutzerIn
Änder doch einfach die Regex von oben! /^a$/ matcht nur auf Zeilen, in denen nur das a steht. Wenn du eher "a ..." willst, dann mach z.B. /^a\s+/ draus.