[Bioperl-l] DEBUGGED Remoteblast from Bio::Perl through proxy

[CHANDAN SINGH]

Hi eveybody 
Those of u ,having problem in blasting sequences from Bio::Perl module through 
proxy  and getting 
                              "time  out "  or  " no route to host " errors 
do  need to set the  environment proxy variable ( hello smarty we all know it ) 
and just give the following argument 
                                                     ( env_proxy => 1 ) 
to 
                  $self->{'_ua'} = new LWP::UserAgent(  );
as 
              $self->{'_ua'} = new LWP::UserAgent( env_proxy => 1 );

in  the following sub in Bio::Tools::Run::RemoteBlast.pm
sub ua {
    my ($self, $value) = @_;    
    if( ! defined $self->{'_ua'} ) {
	$self->{'_ua'} = new LWP::UserAgent(  );
	my $nm = ref($self);
	$nm =~ s/::/_/g;
	$self->{'_ua'}->agent("bioperl-$nm/$MODVERSION");
    }
    return $self->{'_ua'};
}
I saw this bug in the stable version and also in the one downloaded
from CVS yesterday .