[Bioperl-l] Bio::Biblio

[Jan Teune]

Hello @ all,
I'm writing a small script to fetch PubMed-Articles. Since two weeks 
before Christmas, I have a problem to fetch Articles. Below is some Code 
and the Error-Message:

#!/usr/bin/perl -w
use Bio::Biblio;
my $pmid = "15542139";
my $biblio = new Bio::Biblio(
                 -access    => 'soap',
                 -location    => 'http://industry.ebi.ac.uk/soap/openBQS',
                 -destroy_on_exit => '0',
                 );
my $citation = $biblio->get_by_id($pmid);
print $citation;
The Error-Message:
------------- EXCEPTION: Bio::Root::Exception -------------
MSG: --- TRANSPORT ERROR ---
502 Proxy Error
STACK: Error::throw
STACK: Bio::Root::Root::throw /usr/share/perl5/Bio/Root/Root.pm:328
STACK: try{} block /usr/share/perl5/Bio/DB/Biblio/soap.pm:119
STACK: SOAP::Lite::call /usr/share/perl5/SOAP/Lite.pm:3006
STACK: try{} block /usr/share/perl5/SOAP/Lite.pm:2950
STACK: Bio::DB::Biblio::soap::get_by_id 
/usr/share/perl5/Bio/DB/Biblio/soap.pm:368
STACK: ./bibliotest.pl:9
-----------------------------------------------------------

I'm happy for any kind of help,

Jan  :-)