Mercurial > repos > big-tiandm > mirplant2
comparison html.pl @ 44:0c4e11018934 draft
Uploaded
author | big-tiandm |
---|---|
date | Thu, 30 Oct 2014 21:29:19 -0400 |
parents | 5ac42e277c76 |
children |
comparison
equal
deleted
inserted
replaced
43:4c0b1a94b882 | 44:0c4e11018934 |
---|---|
159 } | 159 } |
160 print OUT "The collapsed file path is: <b>$collapsefile</b><br /> | 160 print OUT "The collapsed file path is: <b>$collapsefile</b><br /> |
161 The clean data file path is: <b>$clean</b><br /> | 161 The clean data file path is: <b>$clean</b><br /> |
162 </p> | 162 </p> |
163 <h2> 1. Sequence length count</h2> | 163 <h2> 1. Sequence length count</h2> |
164 <h3> 1.1 Reads length</h3> | 164 "; |
165 "; | 165 print OUT "\n"; |
166 | 166 |
167 print OUT "<img src=\"./$predir/Reads_length.png\" alt=\"Reads_length.png\" width=\"400\" height=\"300\"/> | 167 my $length=$prepath."length.html"; |
168 <h3> 1.2 Tags length count</h3> | 168 open IN,"<$length"; |
169 <img src=\"./$predir/Tags_length.png\" alt=\"Tags_length.png\" width=\"400\" height=\"300\"/> | 169 while (my $aline=<IN>) { |
170 <p> Note:<br />The sequence length data: <a href=\"./$predir/reads_length_distribution.txt\"> length file</a> | 170 chomp $aline; |
171 print OUT "$aline\n"; | |
172 } | |
173 | |
174 print OUT "<p> Note:<br />The sequence length data: <a href=\"./$predir/reads_length_distribution.txt\"> length file</a> | |
171 </p> | 175 </p> |
172 "; | 176 "; |
173 | 177 |
174 #### rfam | 178 #### rfam |
175 unless ($rfampath=~/\/$/) { | 179 unless ($rfampath=~/\/$/) { |