Jan Hudec wrote:
Ok. So I want one thing. If I encode a script in unicode, I want all string literals to behave the same and have the utf8 flag set. But some of them happen not to contain any non-ascii characters. Now, how do I do this?
I fear that's not possible. 'use utf8' enables the utf8 flag only for
literals which contain bytes with the 8th bit set. 7bit characaters are
left without utf8 flag set.
But why do you want to have all you variables utf8 tagged? In general
you don't need to care about the utf8 flag, because Perl upgrades the
variable when needed. (besides the fact, that there may still be bugs in
Perl's internal utf8 handling... ;)
The utf8 flag only becomes important when you're doing I/O, write to
filehandles or pass arguments to external programs etc.. E.g. you need
to apply the correct encoding layer to all your filehandles, otherwise
Perl can't do the right thing for you.
Regards,
Joern
--
$a=$a[8][67][9][0][42][214][82][78][0][50][69][68][69][82][0][73][78][0]
[65][0][20][16][0][68][73][77][69][78][83][73][79][78][65][76][0][65][82
][82][65][89]=sub{sub _($){print$_[ z]}($z,$i)= _;(++$i)while!$z->[$i];$
s+=$i;_ chr($i+32);$s!=2292&&&$a($z->[$i],$c>>$e)};&$a(\ a,$d<<$f);_"\n"
Attachment:
pgpfB5wBo_zH_.pgp
Description: PGP signature