Thread mein script verweigert ignore_case in utf-8 pattern matching (23 answers)
Opened by technix at 2013-06-02 16:19

GwenDragon
 2013-06-02 19:27
#167905 #167905
User since
2005-01-17
14541 Artikel
Admin1
[Homepage]
user image
2013-06-02T16:51:55 technix
@GwenDragon: Ich verwende keine locale und kaum module

Ach, du benutzt sehr wohl Locales! Perl benutzt die des OS automatisch!

Schau was passieren kann:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
root@gwendragon ~ # locale; perl -E "say (('Testä' =~ /ä/i) ? 'Match' : 'NOMatch')"
LANG=en_US.UTF-8
LANGUAGE=
LC_CTYPE="en_US.UTF-8"
LC_NUMERIC="en_US.UTF-8"
LC_TIME="en_US.UTF-8"
LC_COLLATE="en_US.UTF-8"
LC_MONETARY="en_US.UTF-8"
LC_MESSAGES="en_US.UTF-8"
LC_PAPER="en_US.UTF-8"
LC_NAME="en_US.UTF-8"
LC_ADDRESS="en_US.UTF-8"
LC_TELEPHONE="en_US.UTF-8"
LC_MEASUREMENT="en_US.UTF-8"
LC_IDENTIFICATION="en_US.UTF-8"
LC_ALL=
Match
root@gwendragon ~ # perl -E "say (('Testä' =~ /Ä/i) ? 'Match' : 'NOMatch')"
NOMatch

kann auch für Perl 5.8.x gelten
Dort muss nur das als Einzeiler:
Code (perl): (dl )
1
2
perl -e "print (('Testä' =~ /Ä/i) ? 'Match' : 'NOMatch')"
perl -e "print (('Testä' =~ /ä/i) ? 'Match' : 'NOMatch')"


Und nu?
keine Infos angeben. Weiterraten? ;)
Last edited: 2013-06-02 19:32:45 +0200 (CEST)
die Drachin, Gwendolyn


Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel

View full thread mein script verweigert ignore_case in utf-8 pattern matching