use warnings;
use strict;
use Encode qw(encode decode);

# portion 1
my $str = 'Çirçös';
$str = decode('utf-8', $str);
print "$str\n";

# portion 2
my $str1 = 'Çirçös—'; # HTML entity (decimal) for em dash: —
$str1 = decode('utf-8', $str1);
print "$str1\n";

# output from my Eclipse editor

# Çirçös
# Çirçös—
# Wide character in print at D:/EPIC_workspace/PERL/Bibliography/test.pl line 10.