Mercurial > repos > fgiacomoni > hmdb_ms_search
diff wsdl_hmdb.pl @ 20:b5a1d5e43685 draft
Master branch Updating - - Fxx
author | fgiacomoni |
---|---|
date | Wed, 23 Jan 2019 07:49:34 -0500 |
parents | f8c8a990688a |
children | 63ba1cb240b7 |
line wrap: on
line diff
--- a/wsdl_hmdb.pl Wed Jan 23 03:35:34 2019 -0500 +++ b/wsdl_hmdb.pl Wed Jan 23 07:49:34 2019 -0500 @@ -130,7 +130,7 @@ print "\t and ".scalar(@$masses)." masses are submitted as ".scalar(@$submasses)." queries to HMDB \n\n" if ($VERBOSE>1) ; ## get the hmdb server status by a test query - continuous queries or kill script. - $status = $oHmdb->test_matches_from_hmdb_ua() ; + $status = $oHmdb->testMatchesFromHmdbWithUA() ; $oHmdb->check_state_from_hmdb_ua($status) ; ## can kill the script execution my $cluster = 1 ; @@ -140,9 +140,9 @@ my ( $hmdb_masses, $nb_masses_to_submit ) = $oHmdb->prepare_multi_masses_query($mzs) ; - print "\t Submission of m/z cluster ".sprintf '%04s',$cluster."" if ($VERBOSE>1) ; + print "\n\tSubmission of m/z cluster ".sprintf '%04s',$cluster."" if ($VERBOSE>1) ; - ($hmdb_pages, $status) = $oHmdb->get_matches_from_hmdb_ua($hmdb_masses, $delta, $molecular_species) ; + ($hmdb_pages, $status) = $oHmdb->getMatchesFromHmdbWithUA($hmdb_masses, $delta, $molecular_species) ; print "...HMDB reply results with status: $status\n" if ($VERBOSE>1) ; # print Dumper $hmdb_pages ;