in reply to Re: LWP::UserAgent destroys $response->content >:{
in thread LWP::UserAgent destroys $response->content >:{

I tried:-
$ua = LWP::UserAgent->new(use_eval => 0); . . eval { $response = $ua->request($request); }; if ($@) { #print "eval: " . $@ . "\n"; if ($@ =~ /Connection refused/) { print "Response Content...\n"; print $response->content . "\n"; } else { . .
It still didn't work:-
(print "eval: " . $@ . "\n";)
gives:-
eval: Can't read entity body: Connection reset by peer at /usr/local/l +ib/perl5/site_perl/5.005/LWP/Protocol/http.pm line 337.
So, (looking at http.pm) there's the problem confirmed.
1) Linksys BEFSR41 drops the connection before HTTP layer is satisfied that data collection is complete.
2) HTTP layer destroys the response->content collected thus far. >:{

So, anyone care to tell me how to fix the HTTP layer so it does NOT destroy response->content on a dropped connection - if it already collected (at least some) data from current session?
OR
Do I resort to using filename method, with a "length of response" test, to validate UserAgent error, AND rebuild my $response->content from file? (bleaaurh).

Steve Potter
http://www3.sympatico.ca/steven.potter/

Replies are listed 'Best First'.
Re: Re: Re: LWP::UserAgent destroys $response->content >:{
by Thelonius (Priest) on May 23, 2003 at 21:22 UTC
    Oops, in my code I had /Connection refused/ it should be /Connection reset/. See if that works.

    When I was at home, I didn't have any problems accessing the LinkSys (which is the same model). My firmware was from May 2002. I can't remember the version number. You might try upgrading the firmware.