Thread Regex - in einem bestimmten Bereich suchen und strings ersetzen (2 answers)
Opened by Gustl at 2012-07-27 22:59

renee
 2012-07-27 23:13
#160275 #160275
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Wenn es nicht in einem einzigen Regex sein muss, kannst Du es auch so machen:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#!/usr/bin/perl

use strict;
use warnings;

my $string = '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';

my @parts = split /(POINT_[AE])/,$string;

for( my $i = 2; $i < $#parts; $i+=4 ) {
    $parts[$i] =~ s/\bBR\b/YY/g;
}

$string = join '', @parts;
print $string;
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

View full thread Regex - in einem bestimmten Bereich suchen und strings ersetzen