Wenn Du die Anzahl der Zeichen haben willst, musst Du sicherstellen, dass Perl nicht byteorientiert sondern zeichenorientiert arbeitet. D.h., nach dem Lesen der Rohdaten (Bytes) aus STDIN musst Du die erhaltene Bytesequenz in eine Zeichenkette umwandeln, hierbeit spielt die Zeichekodierung eine entscheidende Rolle.

Also guck Dir zunächst das Modul Encode an was Dir den Umgang mit Strings einer bestimmten Zeichenkodierung überhaupt erst ermöglicht.

MfG