Ermittelte Feldlänge 'scheint' falsch zu sein

[Benne]

Hallo,

Wie kann ich diese ggf. sichtbar machen?
Jedes Zeichen durchgehen und ord() anwenden, um den ASCII-Code zu ermitteln.

dafür gibt's doch unpack :)

  
#!/usr/bin/perl -w  
use strict;  
  
my $txt = "bla bla bla";  
print "$txt: ", length($txt), "\n";  
print join ", ", unpack("C*", $txt);  
print "\n";  

Gruß,
Benne