File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change 3939use PCAP::Threaded;
4040use version;
4141
42- const my @VALID_PROCESS => qw( bamToBw mergeBw generateBw) ;
42+ const my @VALID_PROCESS => qw( bamToBw generateBw) ;
4343const my %INDEX_FACTOR => ( ' bamToBw' => -1,
4444 ' generateBw' => 1,
4545 );
@@ -166,9 +166,8 @@ =head1 SYNOPSIS
166166
167167 Targeted processing:
168168 -process -p Only process this step then exit, optionally set -index
169- bwamem - only applicable if input is bam
170- mark - Run duplicate marking (-index N/A)
171- stats - Generates the *.bas file for the final BAM.
169+ bamToBw - Per chromosome BigWigs
170+ generateBw - Generates merged BigWig
172171
173172 -index -i Optionally restrict '-p' to single job
174173 bwamem - 1..<lane_count>
Original file line number Diff line number Diff line change @@ -26,7 +26,7 @@ use base 'Exporter';
2626use FindBin qw( $Bin) ;
2727use File::Which qw( which) ;
2828
29- our $VERSION = ' 2.3 .0' ;
29+ our $VERSION = ' 2.4 .0' ;
3030our @EXPORT = qw( $VERSION _which) ;
3131
3232const my $LICENSE =>
@@ -79,6 +79,7 @@ const my %UPGRADE_PATH => ( # all earlier versions need full upgrade
7979 ' 2.2.0' => ' biobambam,samtools' ,
8080 ' 2.2.1' => ' ' ,
8181 ' 2.3.0' => ' ' ,
82+ ' 2.4.0' => ' ' ,
8283 );
8384
8485sub license {
Original file line number Diff line number Diff line change @@ -46,16 +46,11 @@ sub bamToBw {
4646 my $outfile = q{ '} .File::Spec-> catfile($options -> {' tmp' }, $seq .' .bw' ).q{ '} ;
4747
4848 my $command = q{ bash -c "set pipefail; } ;
49- if ($options -> {' bam' } =~ m /\. bam$ / ) {
50- $command .= _which(' bam2bedgraph' );
51- $command .= q{ } .$options -> {' bam' }.q{ '} .$seq .q{ '} ;
52- }
53- else {
54- $command .= _which(' samtools' );
55- $command .= q{ view -T } .$options -> {' reference' };
56- $command .= q{ -ub } .$options -> {' bam' }.q{ '} .$seq .q{ '} ;
57- $command .= ' | ' ._which(' bam2bedgraph' ).' - ' ;
58- }
49+ $command .= _which(' samtools' );
50+ $command .= q{ view -T } .$options -> {' reference' };
51+ $command .= q{ -F 3844} ; # don't include data that set these flags
52+ $command .= q{ -ub } .$options -> {' bam' }.q{ '} .$seq .q{ '} ;
53+ $command .= ' | ' ._which(' bam2bedgraph' ).' - ' ;
5954 $command .= ' | ' ;
6055 $command .= _which(' wigToBigWig' );
6156 $command .= ' -fixedSummaries -keepAllChromosomes stdin ' .$options -> {' reference' }.' .fai ' .$outfile ;
You can’t perform that action at this time.
0 commit comments