in reply to wide character warning!

say "$alef$alpha$omega";
This is the same as
say STDOUT "$alef$alpha$omega"
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
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.