while(<F>) {
  chomp;
  $lange += length;
}