Mercurial > repos > romaingred > pirna_pipeline
comparison bin/piPipe.pl @ 23:7dd78ad2875f draft
Uploaded
author | romaingred |
---|---|
date | Fri, 20 Oct 2017 09:33:54 -0400 |
parents | 2bd100775c36 |
children | f5da139a09b4 |
comparison
equal
deleted
inserted
replaced
22:b9cf69322742 | 23:7dd78ad2875f |
---|---|
258 main_page ( $gen_dir, $index_page, \@fastq_n, $fastq_n[$child], $ma, $ma_uni, $dir ); | 258 main_page ( $gen_dir, $index_page, \@fastq_n, $fastq_n[$child], $ma, $ma_uni, $dir ); |
259 copy ($index_page, $html_out) if $child == 0; | 259 copy ($index_page, $html_out) if $child == 0; |
260 #HTML Menu | 260 #HTML Menu |
261 my $menu_page = $dir.$fastq_n[$child].'-sub.html'; | 261 my $menu_page = $dir.$fastq_n[$child].'-sub.html'; |
262 menu_page ( $group_dir, $menu_page, \@fastq_n, $fastq_n[$child], $min, $max, $si_min, $si_max, $pi_min, $pi_max, $dir ); | 262 menu_page ( $group_dir, $menu_page, \@fastq_n, $fastq_n[$child], $min, $max, $si_min, $si_max, $pi_min, $pi_max, $dir ); |
263 | 263 unlink glob "$group_dir*.sam"; unlink glob "$group_dir*.fastq"; |
264 $pm->finish(); # pass an exit code to finish | 264 $pm->finish(); # pass an exit code to finish |
265 } | 265 } |
266 $pm->wait_all_children; | 266 $pm->wait_all_children; |
267 | 267 |
268 print $report "Job done!\n"; | 268 print $report "Job done!\n"; |