Coverage Report - Drilling Down 

• Only one branch of this conditional was tested

• In this case the condition really is redundant

else {
  my($part, $rest) = _split_at($w, $self->columns);
  $para .= "\n$part\n";
  $cols_left = $self->columns;
  unshift @words, $rest;
}