diff --git a/workflow/process_scripts b/workflow/process_scripts index 0bdf56d5bdb9252ce418fcf7d0c7bdbcee9ff4a1..636e989b65cc76352111cedac9a8762fbe570384 160000 --- a/workflow/process_scripts +++ b/workflow/process_scripts @@ -1 +1 @@ -Subproject commit 0bdf56d5bdb9252ce418fcf7d0c7bdbcee9ff4a1 +Subproject commit 636e989b65cc76352111cedac9a8762fbe570384 diff --git a/workflow/scripts/check_designfile.pl b/workflow/scripts/check_designfile.pl index 13e6c4850ad651726273658c334531af9817037c..692f9ce498cf22ead33c692d9d721a9837af1055 100755 --- a/workflow/scripts/check_designfile.pl +++ b/workflow/scripts/check_designfile.pl @@ -38,6 +38,7 @@ while (my $line = <DFILE>) { my %hash; foreach my $i (0..$#row) { next unless ($newcols{$colnames[$i]}); + $row[$i] =~ s/-//g unless ($colnames[$i] =~ m/Fq/); $hash{$colnames[$i]} = $row[$i]; } if ($hash{SampleID} =~ m/^\d/) { @@ -51,7 +52,7 @@ while (my $line = <DFILE>) { $j = $lnct %% 2; $hash{SampleGroup} = $grp[$j]; } - $hash{SampleGroup} =~ s/_/./g; + $hash{SampleGroup} =~ s/_//g; my @line; foreach $f (@cols) { push @line, $hash{$f};