length()関数は日本語まじりの文字列でも文字数を返します
例:
my $test="テストです!!!!!";
print length($test),"\n";

結果:
10

バイト数を知りたい場合はどうすればいいのでしょうか?