return ($method, $date);
}
+sub find_taxon {
+ my $species = $_[0];
+ my %taxon_hash = (
+ 'Aegilops_tauschii', '37682',
+ 'Amborella_trichopoda', '13333',
+ 'Arabidopsis_lyrata' , '59689',
+ 'Arabidopsis_thaliana', '3702',
+ 'Arachis_duranensis', '130453',
+ 'Arachis_ipaensis', '130454',
+ 'Batrachochytrium_dendrobatidis', '109871',
+ 'Brachypodium_distachyon', '15368',
+ 'Brachypodium_sylvaticum.Corv', '29664',
+ 'Brachypodium_sylvaticum.Greece', '29664',
+ 'Brachypodium_sylvaticum.Spain', '29664',
+ 'Brassica_oleracea', '3712',
+ 'Brassica_rapa' ,'3711',
+ 'Caenorhabditis_elegans', '6239',
+ 'Cajanus_cajan', '3821',
+ 'Cannabis_sativa.Purple.Kush', '3483',
+ 'Capsella_rubella', '81985',
+ 'Capsicum_annuum', '4072',
+ 'Carica_papaya', '3649',
+ 'Chlamydomonas_reinhardtii', '3055',
+ 'Cicer_arietinum', '3827',
+ 'Citrullus_lanatus', '3654',
+ 'Citrus_clementina', '85681',
+ 'Citrus_sinensis', '2711',
+ 'Coffea_canephora', '49390',
+ 'Cucumis_sativus', '3659',
+ 'Danio_rerio', '7955',
+ 'Drosophila_melanogaster', '7227',
+ 'Ectocarpus_siliculosus', '2880',
+ 'Elaphocordyceps_capitata', '45325',
+ 'Elaphocordyceps_ophioglossoides', '71617',
+ 'Elaphocordyceps_paradoxa', '94208',
+ 'Epichloe_festucae', '35717',
+ 'Escherichia_coli', '562',
+ 'Eucalyptus_grandis', '71139',
+ 'Fragaria_vesca', '57918',
+ 'Fusarium_graminearum', '5518',
+ 'Fusarium_oxysporum.4287', '660037',
+ 'Fusarium_verticillioides', '117187',
+ 'Gadus_morhua', '8049',
+ 'Gasterosteus_aculeatus', '69293',
+ 'Glycine_max', '3847',
+ 'Gossypium_raimondii', '29730',
+ 'Homo_sapiens', '9606',
+ 'Hordeum_vulgare', '4513',
+ 'Jatropha_curcas', '180498',
+ 'Kalanchoe_laxiflora', '1670617',
+ 'Laccaria_bicolor', '29883',
+ 'Leersia_perrieri', '77586',
+ 'Linum_usitatissimum', '4006',
+ 'Magnaporthe_grissa', '148305',
+ 'Malus_domestica', '3750',
+ 'Manihot_esculenta', '3983',
+ 'Medicago_truncatula', '3880',
+ 'Mimulus_guttatus', '4155',
+ 'Mus_musculus', '10090',
+ 'Musa_acuminata', '4641',
+ 'Nectria_haematococca', '140110',
+ 'Nelumbo_nucifera', '4432',
+ 'Neurospora_crassa', '5141',
+ 'Nostoc_punctiforme', '272131',
+ 'Oncorhynchus_mykiss', '8022',
+ 'Oryza_australiensis', '4532',
+ 'Oryza_barthii', '65489',
+ 'Oryza_brachyantha', '4533',
+ 'Oryza_glaberrima', '4538',
+ 'Oryza_glumaepatula', '40148',
+ 'Oryza_granulata', '110450',
+ 'Oryza_kasalath', '4527',
+ 'Oryza_longistaminata', '4528',
+ 'Oryza_meridionalis', '40149',
+ 'Oryza_minuta', '63629',
+ 'Oryza_nivara', '4536',
+ 'Oryza_officinalis', '4535',
+ 'Oryza_punctata', '4537',
+ 'Oryza_rufipogon', '4529',
+ 'Oryza_sativa.indica.gramene', '39946',
+ 'Oryza_sativa.indica.iplant', '39946',
+ 'Oryza_sativa.indica.IR29', '39946',
+ 'Oryza_sativa.indica.pokkali', '39946',
+ 'Oryza_sativa.japonica.iplant', '39947',
+ 'Oryza_sativa.japonica.IRGSP', '39947',
+ 'Oryza_sativa.japonica.MSU', '39947',
+ 'Oryzias_latipes', '8090',
+ 'Pediculus_humanus', '121225',
+ 'Phaseolus_vulgaris', '3885',
+ 'Phoenix_dactylifera', '42345',
+ 'Phyllostachys_heterocycla', '38705',
+ 'Physcomitrella_patens', '3218',
+ 'Phytophthora_infestans', '4787',
+ 'Picea_abies', '3329',
+ 'Pinus_taeda', '3352',
+ 'Populus_trichocarpa', '3694',
+ 'Populus_trichocarpa.ver3', '3694',
+ 'Prunus_persica', '3760',
+ 'Rattus_norvegicus', '10116',
+ 'Rhizopus_oryzae', '64495',
+ 'Ricinus_communis', '3988',
+ 'Saccharomyces_cerevisiae', '4932',
+ 'Salvia_hispancia.salba', '49212',
+ 'Salvia_splendens', '180675',
+ 'Schizosaccharomyces_pombe', '4896',
+ 'Selaginella_moellendorffii', '88036',
+ 'Setaria_italica', '4555',
+ 'Solanum_lycopersicum', '4081',
+ 'Solanum_tuberosum', '4113',
+ 'Sorghum_bicolor', '4558',
+ 'Synechocystis_pcc6803', '1148',
+ 'Takifugu_rubripes', '31033',
+ 'Tetraodon_nigroviridis', '99883',
+ 'Theobroma_cacao', '3641',
+ 'Tolypocladium_inflatum', '29910',
+ 'Trichodesmium_erythraeum', '1206',
+ 'Triticum_aestivum', '4565',
+ 'Triticum_monococcum.DV92', '4568',
+ 'Triticum_monococcum.G3116', '4568',
+ 'Triticum_turgidum', '4571',
+ 'Triticum_urartu', '4572',
+ 'Vitis_vinifera', '29760',
+ 'Zea_mays', '4577',
+ );
+ my $taxon = $taxon_hash{$species};
+ return $taxon;
+}
+
1;