#! /usr/bin/perl -w use 5.014; use feature 'unicode_strings'; use strict; use warnings; use utf8 my $string = "é"; print length($string)."\n"; print "$string\n"; ------------------ ~# ./test.pl 1 ?