うーん、20行目の$_->[0]がutf8になってないってことでしょ？
use Jcode; して、20行目を
print length (jcode($_->[0])->utf8);
にしてみるとどう？