perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 32
Click for quality!




10.02.2012 / 10:04

Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home


PERLscripts


PHPscripts


JAVAscripts


Hilfreiches


Links2www


Newscenter


Community


Interna




Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


BeitragErsetzen von Umlauten
Seitenanfang
Hi,

ich möchte in einem Text die Sonderzeichen (vor allem Umlaute) ersetzen.

Klappt auch mit

s/umlaut/ersetzung/

ganz gut, springt aber nur auf Gross- oder Kleinschreibung an.
Wenn ich es mit

s/umlaut/ersetzung/i

versuche, werden die "Großen" Umlaute trotzdem nicht ersetzt.

Datum: 10.01.2005-14:14

Beitragre: Ersetzen von Umlauten
Seitenanfang
versuche mal
tr/umlaut/ersetzung/

Datum: 10.01.2005-14:35

Beitragre: Ersetzen von Umlauten
Seitenanfang
mit tr/// werden immer nur einzelne Zeichen ersetzt. Also

tr/äöü/aou/ würde gehen, da ä durch a, ö durch o, ü durch u ersetzt wird.
Aber tr/ä/ae/ geht nicht...

Datum: 10.01.2005-16:25

Beitragre: Ersetzen von Umlauten
Seitenanfang
Und wie macht man das mit s/// ?

Datum: 10.01.2005-17:24

Beitragre: Ersetzen von Umlauten
Seitenanfang
my $string = 'Töst';
$string =~ s/ö/oe/g;

Datum: 11.01.2005-07:18

Beitragre: Ersetzen von Umlauten
Seitenanfang
my %UMLAUTE = ( 'Ä' => 'Ae', 'Ö' => 'Oe', 'Ü' => 'Ue',
'ä' => 'ae', 'ö' => 'oe', 'ü' => 'ue' );
my @UMLKEYS = join("|", keys(%UMLAUTE));

$blabla =~ s/(@UMLKEYS)/$UMLAUTE{$1}/g;

Datum: 11.01.2005-08:48

-






-
-