Reguläre Ausdrücke: nur am Ende ersetzen - #59322 (Allgemeines zu Perl)

format_c

2003-10-01 13:50

User since
2003-08-04
1706 Artikel
HausmeisterIn

Also am Ende eines Wortes nicht am Ende eines Strings? Das ist nicht ganz klar.

Aber dein Problem sind die Umlaute:
Siehe mein Script:

Code: (dl )

use strict;
use warnings;
my %umlaute = (
                'ö' => 'oe',
                'ü' => 'ue',
                'ä' => 'ae'
              );
my $var1 = "Dorfstr";

my $var2 = "Brandstroemweg";

for ($var1,$var2) {
s/(ä|ü|ö)/$umlaute{$1}/g;
s/str(?=\b)//g;
print;
}

DorfBrandstroemweg

Gruß alex

Effizente Linuxshell