Help for this page

Select Code to Download

Select or download this

my $string = "k\x{0301}u\x{032D}o\x{0304}\x{0301}n";
print "length: ",length($string),"\n"; # wrong way
...
len: 4
graphs: 4
graphs2: 4