Hello Fellow Monks,

I was trying to figure out why I can not encode and decode Chinese characters in iso-8859-1 encoding format but I can convert it just fine without any problems on utf8 format. I was reading the Encode perldoc documentation but I was not able to figure it how to do it.

Sample of code that I am experimenting:

#!/usr/bin/perl
use utf8;
use Encode;
use strict;
use warnings;
use feature 'say';

binmode( STDOUT, ':utf8' );

my $str = '這是一個測試';

my $octets = encode("utf8", $str);
say decode("utf8", $octets);

my $secondaryOctets = encode("ISO-8859-1" , $str);
say decode("ISO-8859-1", $str);

__END__

$ perl stringEncodingDecoding.pl
這是一個測試
Wide character at /usr/local/lib/x86_64-linux-gnu/perl/5.24.1/Encode.pm line 228.

I also tried first to encode the string to utf8 and then convert it to ISO-8859-1, so I can decoded but I was not successful. Sample of code below:

my $encoded = Encode::from_to($octets, "utf8", "iso-8859-1");
say decode("iso-8859-1", $encoded);

__END__

6
[download]

Thanks in advance for the time and effort trying to assist me.