use bytes;
my $len = bytes::length($string);