From: elserj Date: Thu, 25 Jul 2013 20:01:29 +0000 (+0000) Subject: Fixed for times when no genus + species X-Git-Url: http://gitweb.planteome.org/?a=commitdiff_plain;h=966f4894dc65a860156a3fe63edd34c5f76fda6d;p=old-jaiswallab-svn%2F.git Fixed for times when no genus + species svn path=/; revision=494 --- diff --git a/interactome_scripts/species_tree_names_fix.pl b/interactome_scripts/species_tree_names_fix.pl index 888bc2d..e1e1de1 100755 --- a/interactome_scripts/species_tree_names_fix.pl +++ b/interactome_scripts/species_tree_names_fix.pl @@ -31,7 +31,10 @@ while (){ $spec_name =~ s/\.fasta//g; $spec_name =~ s/\.fa//g; my ($spec_genus, $spec_species) = split(/[_,.]/,$spec_name); - $spec_name = $spec_genus . " " . $spec_species; + if ($spec_species neq "") { + $spec_name = $spec_genus . " " . $spec_species; + }else + $spec_name = $spec_genus; if(!defined($species_hash{$spec_id})) { $species_hash{$spec_id} = $spec_name; }else{