Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Re: Pragma to handle unicode characters

by ikegami (Patriarch)
on Dec 22, 2008 at 01:32 UTC ( #731950=note: print w/replies, xml ) Need Help??

in reply to Pragma to handle unicode characters

:utf8 on input is insecure.
binmode STDIN, ":utf8"; binmode STDOUT, ":utf8";

should be

binmode STDIN, ":encoding(UTF-8)"; binmode STDOUT, ":encoding(UTF-8)"; binmode STDERR, ":encoding(UTF-8)";

and can be replaced with

use open ':std', ':encoding(UTF-8)';

or better yet

use open ':std', ':locale';

:utf8 on input is insecure.
open(IN, "<utf8", "sample.txt");

should be

open(IN, "<:encoding(UTF-8)", "sample.txt");

and can be replaced with

use open IO => ':encoding(UTF-8)';


use open IO => ':locale';

use utf8;
indicates the source file is encoded using UTF-8. Without it, Perl assumes it's encoded using iso-latin-1.

None of the above decodes the content of @ARGV, data read from open(FH, '-') or data read via <>. The last is being worked on.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://731950]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (3)
As of 2022-08-17 16:51 GMT
Find Nodes?
    Voting Booth?

    No recent polls found