From 8bc0b26bbec91b1ccddda8898bc39c8adf14e2b8 Mon Sep 17 00:00:00 2001
From: elserj <elserj@localhost>
Date: Sat, 8 Jan 2011 01:31:32 +0000
Subject: [PATCH] expanded to .fa as well as .fasta files.  Also, seperate name
 into genus+species so easier to read

svn path=/; revision=83
---
 interactome_scripts/species_tree_names_fix.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/interactome_scripts/species_tree_names_fix.pl b/interactome_scripts/species_tree_names_fix.pl
index 19d5689..888bc2d 100755
--- 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{
-- 
2.34.1