my $genfile = 'c:\\bemisia_coi.gb';