expanded to .fa as well as .fasta files. Also, seperate name into genus+species...

svn path=/; revision=83

diff --git a/interactome_scripts/species_tree_names_fix.pl b/interactome_scripts/species_tree_names_fix.pl
index 19d568974af1965800e5ea400b5f87061c5986a6..888bc2d45c3d04951d260a0368cceff167e5d06f 100755 (executable)
--- a/interactome_scripts/species_tree_names_fix.pl
+++ b/interactome_scripts/species_tree_names_fix.pl
@@ -29,6 +29,9 @@ while (<table_file>){
        chomp $line;
        my ($spec_id,$spec_name) = split("\t",$line);
        $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(!defined($species_hash{$spec_id})) {
                $species_hash{$spec_id} = $spec_name;
        }else{