perlquestion
Mike98mm
<p>I am new to perl. </p>
<p>I am trying to write a simple code to find an ORF (open reading frames)</p>
<p>I am trying to identify the ORF with start(ATG) and stop codons(TAA|TAG|TGA) and print out the ORF. </p>
<p>The nucleotide sequence: <c>TTCAGGTGTTTGCAACTGCGTTTTATTGCAAGAAAGAGTGGAGGGGTTTCCATGGGGCCCACCTCACAACCCACTC
TTCACCCCCAAAATCACGCAGGGATCGGACTCAGGAAAGGGAAGCATCTGTGTGTTGCATACGAGCCCTTCCTGTACTTACTTCTTTCACAGCAGGGAAGG
AAGAGGGAAGAGGCAGCTGTGGAGAGGATCAGGTTGCGGGAGGTGGGTATCTCGCTGCTCTGACCTTACGTACAGTCCTCCACAGAAGCATCAAAGTGGACT
GGCACATATCGGCTCCCTTCACAGGCCACAATCATCTGTCTCTCCTTCGGGCTGGTCCGGTATCCAC</c></p>
<p><small><i>2018-05-02 [Athanasius] added code and paragraph tags</small></p>