$rightmost_position_of_letter = rindex ($str,[ATCG]);