From 6fc0f0c5b304f56883771d7ce6971399d6f1a7e9 Mon Sep 17 00:00:00 2001 From: elserj Date: Fri, 28 Jun 2013 23:07:32 +0000 Subject: [PATCH] Added new species svn path=/; revision=488 --- interactome_scripts/find_species.pl | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/interactome_scripts/find_species.pl b/interactome_scripts/find_species.pl index 23f5add..614aafc 100755 --- a/interactome_scripts/find_species.pl +++ b/interactome_scripts/find_species.pl @@ -79,6 +79,8 @@ sub find_species { $temp = "Mimulus_guttatus"; }elsif ($temp =~ /Mus\_musculus/) { $temp = "Mus_musculus"; + }elsif ($temp =~ /Musa/) { + $temp = "Musa_acuminata"; }elsif ($temp =~ /Nectria\_haematococca/) { $temp = "Nectria_haematococca"; }elsif ($temp =~ /Neurospora/) { @@ -95,6 +97,8 @@ sub find_species { $temp = "Pediculus_humanus"; }elsif ($temp =~ /Phoenix/) { $temp = "Phoenix_dactylifera"; + }elsif ($temp =~ /Phyllostachys/) { + $temp = "Phyllostachys_heterocycla"; }elsif ($temp =~ /Physcomit/) { $temp = "Physcomitrella_patens"; }elsif ($temp =~ /Populus/) { @@ -258,6 +262,9 @@ sub find_gene { }elsif ($species eq "Mus_musculus") { my ($protein,$type,$chrom,$gene_id,$transcript) = split(/\s/,$gene_header); $gene = $protein; + }elsif ($species eq "Musa_acuminata") { + my ($protein,$type,$chrom,$gene_id,$transcript) = split(/\s/,$gene_header); + $gene = $protein; }elsif ($species eq "Nectria_haematococca") { my ($source, $spec, $int_id, $gene_id) = split(/\|/, $gene_header); $gene = $gene_id; @@ -283,6 +290,9 @@ sub find_gene { }elsif ($species eq "Phoenix_dactylifera") { my ($gene_id, $temp) = split(/\s/, $gene_header); $gene = $gene_id; + }elsif ($species eq "Phyllostachys_heterocycla") { + my ($gene_id, $gene_model, $location, $dot, $strand, $dot2, $info) = split (/\s+/, $gene_header); + $gene = $gene_id; }elsif ($species eq "Physcomitrella_patens") { my ($name,$pac_id) = split(/\|/,$gene_header); $gene = $name; #??? @@ -410,6 +420,7 @@ sub all_species_array { push (@spec_array, "Medicago_truncatula"); push (@spec_array, "Mimulus_guttatus"); push (@spec_array, "Mus_musculus"); + push (@spec_array, "Musa_acuminata"); push (@spec_array, "Nectria_haematococca"); push (@spec_array, "Neurospora_crassa"); push (@spec_array, "Nostoc_punctiforme"); @@ -418,6 +429,7 @@ sub all_species_array { push (@spec_array, "Oryzias_latipes"); push (@spec_array, "Pediculus_humanus"); push (@spec_array, "Phoenix_dactylifera"); + push (@spec_array, "Phyllostachys_heterocycla"); push (@spec_array, "Physcomitrella_patens"); push (@spec_array, "Populus_trichocarpa"); push (@spec_array, "Prunus_persica"); -- 2.34.1