if ( $genomepair eq 'aa' ) { ++$tt; }