$pos = rindex $_, " ", $len;
  $pos = $len if $pos < 0;