Re^2: Do I have a unicode problem, or is this something else?

Hi Graff,

Thanks for this. So what I understand is the use utf8 that I have in my modules will just simplify any

binmode STDOUT, ":utf8"; 
my $a = __t("Patient Id"); 
utf8::decode( $a ); 
print $a,"\n";
[download]

binmode STDOUT, ":utf8"; 
my $a = __t("Patient Id"); 
decode( $a ); 
print $a,"\n";
[download]

Presumably I can also insert this code into __t() and not worry about putting it elsewhere.

Thanks for this: very helpful.

Have a good day.

regards

Steve

Comment on Re^2: Do I have a unicode problem, or is this something else? Select or Download Code

Replies are listed 'Best First'.
Re^3: Do I have a unicode problem, or is this something else? by graff (Chancellor) on Jun 10, 2010 at 16:56 UTC
So what I understand is the `use utf8` that I have in my modules will just simplify any ... to ... If you think this is an enhancement -- and you have no other reason for `use utf8` in your code -- I would consider it a false "advantage", especially if you need (now or in the future) to add `use Encode` to your script, since you will then have a clash in how the `decode()` function is defined. Did you notice this (rather prominent) passage in the perldoc "utf8" man page? *Do not use this pragma for anything else than telling Perl that your script is written in UTF-8.* (Italics added, bold in original.)	[reply] [d/l] [select]
Re^4: Do I have a unicode problem, or is this something else? by Steve_BZ (Chaplain) on Jun 10, 2010 at 17:03 UTC
Hi Graff, Well in fact the first mechanism didn't work for me but the second did. I'm sure it was something to do with my own code! So I changed `use utf8` to `use Encode` throughout and everything sprung to life, incluyding some code which I didn't know wasn't working! So now I have `use Encode` but not `use utf8`. Do you think that is OK? Regards Steve	[reply] [d/l] [select]
Re^5: Do I have a unicode problem, or is this something else? by ikegami (Patriarch) on Jun 10, 2010 at 17:35 UTC
`use utf8;` tells perl that your source is encoded using UTF-8. If your source is encoded using UTF-8, you want to use `use utf8;`. If you use Encode's functions (e.g. `encode($enc, $text)` and `decode($enc, $text)`), then you'll want to load Encode and import its functions.	[reply] [d/l] [select]
Re^3: Do I have a unicode problem, or is this something else? by ikegami (Patriarch) on Jun 10, 2010 at 17:32 UTC
utf8 doesn't export any functions, at least not by default. Your second snippet doesn't run. `$ perl -e'use utf8; decode($_)' Undefined subroutine &main::decode called at -e line 1.` [download]	[reply] [d/l]
Re^4: Do I have a unicode problem, or is this something else? by Steve_BZ (Chaplain) on Jun 10, 2010 at 17:45 UTC
Hi ikegami, You're right I got the same error. I used `use Encode` in the end. Regards Steve	[reply] [d/l]