my $codon = shift;