wide character warning!

DragonCoder has asked for the wisdom of the Perl Monks concerning the following question:

Hi monks! I am a newbie in perl and have lots of problems in coding .. i am facing an error that says something like this.. Wide character in say at ./characters_codepoint.pl line 13. אαω and can u suggest me the best ways to learn perl, i am currently reading learning perl and practicing in a terminal on my mac.

#!/usr/bin/perl -w

use 5.018;
open(OUT,">out.html");
binmode(OUT, "utf8");
use utf8;


my $alef = chr(0x05D0);
my $alpha = chr(hex('03B1'));
my $omega = chr(0x03C9);

say "$alef$alpha$omega";
[download]

Comment on wide character warning! Download Code

Replies are listed 'Best First'.
Re: wide character warning! by Loops (Curate) on Nov 06, 2014 at 09:25 UTC
Hi, and welcome to the monastery. If you add "use diagnostics;" in addition to your "use 5.018;" Perl will give you a helpful error with a solution: `binmode STDOUT, ':utf8';` [download] Although another choice if you want to configure all of Perl's Unicode options is the utf8::all module.	[reply] [d/l]
Re^2: wide character warning! by 2teez (Vicar) on Nov 06, 2014 at 19:21 UTC
Just a Note: `":utf8" only marks the data as UTF-8 without checking whether the data is a valid UTF-8, meanwhile ":encoding(UTF-8)" checks that the data are actually valid UTF-8.` So, I will rather write: `binmode(STDOUT, ":encoding(utf8)");` [download] If you tell me, I'll forget. If you show me, I'll remember. if you involve me, I'll understand. --- Author unknown to me	[reply] [d/l]
Re: wide character warning! by Anonymous Monk on Nov 06, 2014 at 09:17 UTC
STDOUT is not OUT, you forgot to say to out; also error checking like autodie , Path::Tiny is convenience `use Path::Tiny qw/ path /; my $outfh = path( "out.html" )->openw_utf8; say $outfh "\x{FEFF}\x{1F42A}\x{1F42B}"; close $outfh;` [download] shorter :) `use Path::Tiny qw/ path /; path( "out.html" )->spew_utf8( "\x{FEFF}\x{1F42A}\x{1F42B}" );` [download]	[reply] [d/l] [select]
Re: wide character warning! by Anonymous Monk on Nov 06, 2014 at 11:37 UTC
`say "$alef$alpha$omega";` [download] This is the same as `say STDOUT "$alef$alpha$omega"` [download] I recommend you to use the following prelude in your programs: `use 5.018; use diagnostics; use utf8; # this tells perl that the source code is in utf-8 use open qw( :encoding(utf-8) :std ); # perl will try to open everythi +ng in utf-8 mode by default` [download] Or you can use the utf8:all module. can u suggest me the best ways to learn perl, i am currently reading learning perl The Perl code you provided is pretty bad, to be frank. If that is what 'Learning Perl' teaches then I'd recommend you to stop reading it. Try 'Modern Perl' instead.	[reply] [d/l] [select]