From 7a0e84b885da3fae72dd9bb68d691b40d319440b Mon Sep 17 00:00:00 2001 From: elserj Date: Tue, 21 Sep 2010 20:15:03 +0000 Subject: [PATCH] Added subroutine to output all species in an array (useful for superclusters.pl, probably others) svn path=/; revision=39 --- interactome_scripts/find_species.pl | 45 +++++++++++++++++++++++++++++ 1 file changed, 45 insertions(+) diff --git a/interactome_scripts/find_species.pl b/interactome_scripts/find_species.pl index 2b39b44..ae21489 100755 --- a/interactome_scripts/find_species.pl +++ b/interactome_scripts/find_species.pl @@ -220,4 +220,49 @@ sub find_gene { return $gene; } +sub all_species_array { + # return all species in an array + my @spec_array; + push (@spec_array, "Arabidopsis_lyrata"); + push (@spec_array, "Arabidopsis_thaliana"); + push (@spec_array, "Batrachochytrium_distachyon"); + push (@spec_array, "Brachypodium_distachyon"); + push (@spec_array, "Caenorhabditis_elegans"); + push (@spec_array, "Carica_papaya"); + push (@spec_array, "Chlamydomonas_reinhardtii"); + push (@spec_array, "Cucumis_sativus"); + push (@spec_array, "Danio_rerio"); + push (@spec_array, "Drosophila_melanogaster"); + push (@spec_array, "Ectocarpus_siliculosus"); + push (@spec_array, "Escherichia_coli"); + push (@spec_array, "Fragaria_vesca"); + push (@spec_array, "Glycine_max"); + push (@spec_array, "Homo_sapiens"); + push (@spec_array, "Laccaria_bicolor"); + push (@spec_array, "Magnaporthe_grissa"); + push (@spec_array, "Manihot_esculenta"); + push (@spec_array, "Medicago_truncatula"); + push (@spec_array, "Mimulus_guttatus"); + push (@spec_array, "Mus_musculus"); + push (@spec_array, "Neurospora_crassa"); + push (@spec_array, "Nostoc_punctiforme"); + push (@spec_array, "Oryza_sativa"); + push (@spec_array, "Pediculus_humanus"); + push (@spec_array, "Physcomitrella_patens"); + push (@spec_array, "Populus_trichocarpa"); + push (@spec_array, "Prunus_persica"); + push (@spec_array, "Rattus_norvegicus"); + push (@spec_array, "Rhizopus_oryzae"); + push (@spec_array, "Ricinus_communis"); + push (@spec_array, "Saccharomyces_cerevisiae"); + push (@spec_array, "Schizosaccharomyces_pombe"); + push (@spec_array, "Selaginella_moellendorffii"); + push (@spec_array, "Sorghum_bicolor"); + push (@spec_array, "Synechocystis_pcc6803"); + push (@spec_array, "Trichodesmium_erythraeum"); + push (@spec_array, "Vitis_vinifera"); + push (@spec_array, "Zea_mays"); + + return @spec_array; +} 1; -- 2.34.1