Merge pull request #107 from cancerit/feature/masking

applied masking to pindel output
cancerit · Mar 15, 2022 · fed94f7 · fed94f7
2 parents e574359 + 489c887
commit fed94f7
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/perl/bin/pindel_2_combined_vcf.pl b/perl/bin/pindel_2_combined_vcf.pl
@@ -195,6 +195,11 @@ sub _process_fh{
   my ($active_sam_fh, $sample, $strand);
   while(my $record = $record_generator->next_record){
 
+    if($record->ref_seq eq $record->alt_seq) {
+      warn "SKIP: Dirty record due to issue in pindel core";
+      next;
+    }
+
     next if($opts->{'s'} && ($record->p_mt_pos + $record->p_mt_neg) < 3);
 
     $record->id($id_gen->next);