@loci_codes = qw( Bet01 Bet05 Bet06 Bet12 );