Help for this page
my %codon_table = ( 'TTT' => 'F', ... 'CTG' => 'L', # AND SO ON );
my %codon_table = ( 'TTT' => 'F', ... push @marcos, $protein; } print "La secuencia $reading_frame es: $_\n\n" for @marcos;