$line = join(' ', map {s|[/-]\d+$||; $_} split(/\s+/, $line));
return $DXProt::badspotter->set(8, $self->msg('e6'), $self, $line);
$line = join(' ', map {s|[/-]\d+$||; $_} split(/\s+/, $line));
return $DXProt::badspotter->set(8, $self->msg('e6'), $self, $line);