RosettaCodeData/Task/String-length/Metafont/string-length.metafont

string s;
s := "Hello Moose";
show length(s);          % 11 (ok)
s := "Hello Møøse";
show length(s);          % 13 (number of bytes when the string is UTF-8 encoded,
                         % since ø takes two bytes)