use utf8;
my $binary = "\xE2\x82\xAC";
print ord($binary);
print length($binary);