#! /usr/bin/perl -w use 5.014; use feature 'unicode_strings'; use strict; use warnings; my $string = "\x{c3}\x{a9}"; print length($string)."\n"; print "$string\n"; ------------------ ~# ./test.pl 2 é