use Encode qw(decode);
my $real_string = decode("utf8",$input_string); #assumes $input string is in UTF-8 encoding
print "string is ".lenght($real_string)." characters\n"; # length() now interprets $real_string in character instead of bytes.