comparison bin/sRNAPipe.pl @ 23:6669c4f79cac draft

Uploaded
author brasset_jensen
date Sun, 13 May 2018 15:46:36 -0400
parents b80aa719069f
children 54cb93674556
comparison
equal deleted inserted replaced
22:59c728d31244 23:6669c4f79cac
10 use lib $FindBin::Bin; 10 use lib $FindBin::Bin;
11 use resize qw ( size_distribution ); 11 use resize qw ( size_distribution );
12 use subgroups qw (subgroups ); 12 use subgroups qw (subgroups );
13 use ppp qw ( ping_pong_partners ); 13 use ppp qw ( ping_pong_partners );
14 use Rcall qw (pie_chart bg_to_png ); 14 use Rcall qw (pie_chart bg_to_png );
15 use align qw ( to_build get_unique sam_count sam_count_mis sam_sorted_bam rpms_rpkm BWA_call get_fastq_seq extract_sam sam_to_bam_bg ); 15 use align qw ( to_build get_unique sam_count sam_count_mis sam_sorted_bam rpms_rpkm rpms_rpkm_te BWA_call get_fastq_seq extract_sam sam_to_bam_bg );
16 use html qw ( main_page details_pages menu_page ppp_page ); 16 use html qw ( main_page details_pages menu_page ppp_page );
17 use File::Copy; 17 use File::Copy;
18 18
19 my ( @fastq, @fastq_n, $dir, $min, $max, $mis, $misTE, $help, $Pcheck, $mapnumf, $html_out); 19 my ( @fastq, @fastq_n, $dir, $min, $max, $mis, $misTE, $help, $Pcheck, $mapnumf, $html_out);
20 my ( $ref, $tRNAs, $rRNAs, $snRNAs, $miRNAs, $transcripts, $TE ); 20 my ( $ref, $tRNAs, $rRNAs, $snRNAs, $miRNAs, $transcripts, $TE );