comparison pangenomeCogAnalysis_V1.pl @ 10:ccb38fd085b2 draft

Uploaded
author mgarnier
date Mon, 05 Jul 2021 12:52:58 +0000
parents 9132bdc6ce8b
children b36506d26a43
comparison
equal deleted inserted replaced
9:ede0f548b6ec 10:ccb38fd085b2
494 my $gene_name = $table_gff[8]; 494 my $gene_name = $table_gff[8];
495 my $type = $table_gff[2]; 495 my $type = $table_gff[2];
496 496
497 497
498 498
499 if ($type && $type eq "mRNA" && $gene_name =~ /ID=([^;]+);/){ 499 if ($type && ($type eq "mRNA" or $type eq "CDS") && $gene_name =~ /ID=([^;]+);/){
500 my $gene = $1; 500 my $gene = $1;
501 # print $gene."\n"; 501 # print $gene."\n";
502 # exit; 502 # exit;
503 $hash_of_genes{$gene}=1; 503 $hash_of_genes{$gene}=1;
504 504