Mercurial > repos > fgiacomoni > hmdb_ms_search

comparison wsdl_hmdb.pl @ 14:625fa968d99a draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Master branch Updating - - Fxx
author fgiacomoni
date Thu, 10 Jan 2019 09:10:14 -0500
parents 4eb2de7c24d1
children beb9619263b0
comparison
equal deleted inserted replaced
13:3587cb923890 14:625fa968d99a
125 foreach my $mzs ( @{$submasses} ) { 125 foreach my $mzs ( @{$submasses} ) {
126 # print Dumper $mzs ; 126 # print Dumper $mzs ;
127 my $result = undef ; 127 my $result = undef ;
128 my ( $hmdb_masses, $nb_masses_to_submit ) = $oHmdb->prepare_multi_masses_query($mzs) ; 128 my ( $hmdb_masses, $nb_masses_to_submit ) = $oHmdb->prepare_multi_masses_query($mzs) ;
129 $hmdb_pages = $oHmdb->get_matches_from_hmdb_ua($hmdb_masses, $delta, $molecular_species) ; 129 $hmdb_pages = $oHmdb->get_matches_from_hmdb_ua($hmdb_masses, $delta, $molecular_species) ;
130
131 # print Dumper $hmdb_pages ;
132
133 sleep(2) ;
134
130 ($result) = $oHmdb->parse_hmdb_csv_results($hmdb_pages, $mzs, $max_query) ; ## hash format result 135 ($result) = $oHmdb->parse_hmdb_csv_results($hmdb_pages, $mzs, $max_query) ; ## hash format result
131 ## This previous step return results with cutoff on the number of entries returned ! 136 ## This previous step return results with cutoff on the number of entries returned !
132 $results = [ @$results, @$result ] ; 137 $results = [ @$results, @$result ] ;
138
139 sleep(2) ;
133 } 140 }
134 141
135 ## foreach metabolite get its own metabocard 142 ## foreach metabolite get its own metabocard
136 $hmdb_ids = $oHmdb->get_unik_ids_from_results($results) ; 143 $hmdb_ids = $oHmdb->get_unik_ids_from_results($results) ;
137 # $hmdb_ids->{'HMDB03125'} = 1 , 144 # $hmdb_ids->{'HMDB03125'} = 1 ,