- or download this
my $i = 0;
foreach my $match(@exonic_matches) {
...
$value = $exon_ID[$i];
$col = $exon_left{$value};
#...
- or download this
my $i = 0;
...
$col = $exon_left{$value};
#...
}
- or download this
my $i = 0;
...
$col = $exon_left{$value};
#...
}
- or download this
if ($strands{$value} =~ m/\+/) {
$diff_three_prime = $LBP[$i] - $three_prime_ss[$exons2{$value} - 1
+];
$diff_five_prime = $LBP[$i] - $five_prime_ss[$exons2{$value} - 1];
+
# ...
- or download this
if ($strands{$value} =~ m/\+/) {
$diff_three_prime = $LBP[$i] - $three_prime_ss[$exons2{$value}
+ - 1];
$diff_five_prime = $LBP[$i] - $five_prime_ss[$exons2{$value} -
+ 1];
# ...