# HG changeset patch # User romaingred # Date 1508760997 14400 # Node ID f5da139a09b49713df8edfce92373a9bed469cd9 # Parent 08bbde9d0c9d06dbf9520d534420a47ff1f46a38 Uploaded diff -r 08bbde9d0c9d -r f5da139a09b4 bin/piPipe.pl --- a/bin/piPipe.pl Mon Oct 23 08:16:22 2017 -0400 +++ b/bin/piPipe.pl Mon Oct 23 08:16:37 2017 -0400 @@ -68,8 +68,7 @@ my $file = $dir.'report.txt'; open my $report, '>', $file or die "Cannot open $file $!\n"; -my %toBuild; -@toBuild{ ( $ref, $tRNAs, $rRNAs, $snRNAs, $miRNAs, $exons, $TE ) } = ( $build_index, $build_tRNAs, $build_rRNAs, $build_snRNAs, $build_miRNAs, $build_exons, $build_TE ) ; +my @toBuild = ( [$build_index, \$ref], [$build_tRNAs, \$tRNAs], [$build_rRNAs, \$rRNAs], [$build_snRNAs, \$snRNAs], [$build_miRNAs, \$miRNAs], [$build_exons, \$exons], [$build_TE, \$TE] ); to_build ( \%toBuild, $report ); my $proc_child = ceil($max_procs / scalar(@fastq));