comparison lib/hmdb.pm @ 9:c32280662103 draft

Master branch Updating - - Fxx
author fgiacomoni
date Wed, 19 Sep 2018 11:09:30 -0400
parents 97788e4bf3fc
children 625fa968d99a
comparison
equal deleted inserted replaced
8:97788e4bf3fc 9:c32280662103
223 223
224 my @page = () ; 224 my @page = () ;
225 225
226 my $ua = LWP::UserAgent->new( keep_alive => 10 ); 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(240); 228 $ua->timeout(2400) ;
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');