Loading fqfilter-inDrops.pl +2 −1 Original line number Original line Diff line number Diff line Loading @@ -140,7 +140,8 @@ $total++; if(($btmp < $bnbases) && ($mtmp < $mnbases)){ if(($btmp < $bnbases) && ($mtmp < $mnbases)){ $filtered++; $filtered++; $b1[0] =~ m/^@(.*)\s/; $brid = $b1[0]; $brid =~ m/^@(.*)/; print BCOUT $1,"\t4\t*\t0\t0\t*\t*\t0\t0\t$bseq$mseq\t$bqual$mqual\n"; print BCOUT $1,"\t4\t*\t0\t0\t*\t*\t0\t0\t$bseq$mseq\t$bqual$mqual\n"; print BCOUTFULL $b1[0],"\n",$bseq,$mseq,"\n+\n",$bqual,$mqual,"\n"; print BCOUTFULL $b1[0],"\n",$bseq,$mseq,"\n+\n",$bqual,$mqual,"\n"; print CDOUT $c[0],"\n",$crseq,"\n",$cqid,"\n",$cqseq,"\n"; print CDOUT $c[0],"\n",$crseq,"\n",$cqid,"\n",$cqseq,"\n"; Loading Loading
fqfilter-inDrops.pl +2 −1 Original line number Original line Diff line number Diff line Loading @@ -140,7 +140,8 @@ $total++; if(($btmp < $bnbases) && ($mtmp < $mnbases)){ if(($btmp < $bnbases) && ($mtmp < $mnbases)){ $filtered++; $filtered++; $b1[0] =~ m/^@(.*)\s/; $brid = $b1[0]; $brid =~ m/^@(.*)/; print BCOUT $1,"\t4\t*\t0\t0\t*\t*\t0\t0\t$bseq$mseq\t$bqual$mqual\n"; print BCOUT $1,"\t4\t*\t0\t0\t*\t*\t0\t0\t$bseq$mseq\t$bqual$mqual\n"; print BCOUTFULL $b1[0],"\n",$bseq,$mseq,"\n+\n",$bqual,$mqual,"\n"; print BCOUTFULL $b1[0],"\n",$bseq,$mseq,"\n+\n",$bqual,$mqual,"\n"; print CDOUT $c[0],"\n",$crseq,"\n",$cqid,"\n",$cqseq,"\n"; print CDOUT $c[0],"\n",$crseq,"\n",$cqid,"\n",$cqseq,"\n"; Loading
