Regex - in einem bestimmten Bereich suchen und strings ersetzen (gelöst) - #160274 (Allgemeines zu Perl)

Gustl

2012-07-27 22:59

User since
2011-01-27
441 Artikel
BenutzerIn

Hallo,

ich möchte aus einer Zeichenkette in einem bestimmten Bereich alle strings die wie zb "BR" durch "YY" ersetzten..

Folgender Zeichenkette:
BC BR BD POINT_A DN HN JN BR NK BR POINT_E BR NH BR CJ POINT_A MK NE BR BD BR POINT_E BR BD

Zwischen POINT_A und POINT_B sollen also alle strings "BR" durch "YY" ersetzt werden, quasi die hier fett dargestellten. Die kursiven sollen aber so bleiben. und genau da ist mein Problem. :(

1. Ansatz:

Code: (dl )

$content =~ s/(BR)/YY/g;

2. Ansatz:

Code: (dl )

$content =~ s/POINT_A(BR)POINT_E/YY/g;

Im ersten werden alle ersetzt. Und im zweiten Ansatz ersetzt er dann alles zwischen den points mit inhalt...
Weiß wer wo ich da ansetzten muss? Wäre super.

Gruß