Mercurial > repos > fgiacomoni > hmdb_ms_search

comparison lib/hmdb.pm @ 8:97788e4bf3fc draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload commit d1a5cd8f1baf00879ffa44649883f91c64f43392-dirty
author fgiacomoni
date Sat, 20 Jan 2018 17:36:51 -0500
parents 7ed37640fe2a
children c32280662103
comparison
equal deleted inserted replaced
7:ecf8e43aceda 8:97788e4bf3fc
221 my $self = shift ; 221 my $self = shift ;
222 my ( $masses, $delta, $mode ) = @_ ; 222 my ( $masses, $delta, $mode ) = @_ ;
223 223
224 my @page = () ; 224 my @page = () ;
225 225
226 my $ua = new LWP::UserAgent; 226 my $ua = LWP::UserAgent->new( keep_alive => 10 );
227 $ua->agent("Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/34.0.1847.131 Safari/537.36"); 227 $ua->agent("Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/34.0.1847.131 Safari/537.36");
228 $ua->timeout(500); 228 $ua->timeout(240);
229 229
230 my $req = HTTP::Request->new( 230 my $req = HTTP::Request->new(
231 POST => 'http://specdb.wishartlab.com/ms/search.csv'); 231 POST => 'http://specdb.wishartlab.com/ms/search.csv');
232 232
233 $req->content_type('application/x-www-form-urlencoded'); 233 $req->content_type('application/x-www-form-urlencoded');