Opened by rosti at 2011-08-03 19:16
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
und weils so schön war, noch ein 3. beispiel:
ich habe das pragma utf8, und ich habe einen string, der im skript selbst definiert wurde. laut deiner aussage müsste substr() diesen string nun zeichenweise behandeln. tut es aber nicht.
weil sich substr() einen dreck darum schert, ob da irgendwo use utf8 steht. es ist ein bytestring.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
$ perl -wE'use Devel::Peek;
use utf8;
use Encode;
my $str = "\303\244";
my $substr = substr($str, 0, 1);
Dump $substr;'
SV = PV(0x9b9f6c8) at 0x9bbca70
REFCNT = 1
FLAGS = (PADMY,POK,pPOK)
PV = 0x9bc0978 "\303"\0
CUR = 1
LEN = 4
ich habe das pragma utf8, und ich habe einen string, der im skript selbst definiert wurde. laut deiner aussage müsste substr() diesen string nun zeichenweise behandeln. tut es aber nicht.
weil sich substr() einen dreck darum schert, ob da irgendwo use utf8 steht. es ist ein bytestring.
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem