[Bioperl-l] How to set the proxy information?

[ycwei@mail.ustc.edu.cn]

Sorry, I made a mistake about the Subject.

Hi,

Does the LWP support in Bio::DB::WebDBSeqI really work?
As the doc of Bio::DB::WebDBSeqI noted, I modified the
examples/getGenBank.pl as the following:


...

use Bio::DB::GenBank;
use Bio::SeqIO;

my $gb = new Bio::DB::GenBank;
# $gb->proxy(['http'.'ftp'],'http://xx.xx.xx.xx:8080');
# or
$gb->ua->proxy(['http'.'ftp'], 'http://xx.xx.xx.xx:8080');

...

But it did not work at all.
The error message is presented here:
[eacheon@neuro examples]$ perl getGenBank.pl
-------------------- WARNING ---------------------
MSG: 500 (Internal Server Error) Can't connect to www.ncbi.nlm.nih.gov:80
(Timeout)
Client-Date: Sun, 28 Jul 2002 11:02:45 GMT



---------------------------------------------------
------------- EXCEPTION  -------------
MSG: WebDBSeqI Request Error

STACK Bio::DB::WebDBSeqI::_request
/usr/lib/perl5/site_perl/5.6.1/Bio/DB/WebDBSeqI.pm:523
STACK Bio::DB::WebDBSeqI::get_seq_stream
/usr/lib/perl5/site_perl/5.6.1/Bio/DB/WebDBSeqI.pm:375
STACK Bio::DB::WebDBSeqI::get_Stream_by_id
/usr/lib/perl5/site_perl/5.6.1/Bio/DB/WebDBSeqI.pm:237
STACK Bio::DB::WebDBSeqI::get_Seq_by_id
/usr/lib/perl5/site_perl/5.6.1/Bio/DB/WebDBSeqI.pm:143
STACK toplevel getGenBank.pl:25

--------------------------------------

Regards
Wei Yichun,

Department of Biology,
Univ. Sci. & Tec. China
P.O.Box 4, Hefei,
230027