Select Code to Download

my ($left_of_boundary, $intron_from_boundary, $new_left, $seq, $col7, 
+$col_alt, $matchID);
my $i = 0;
open (INTRONS_five, '>fasta_introns_five_non');
...
            }
        }    
        }