[prev in list] [next in list] [prev in thread] [next in thread] 

List:       perl-win32-web
Subject:    Re: HTTP::Message->protocol() error?
From:       "$Bill Luebkert" <dbe () wgn ! net>
Date:       2000-11-30 0:07:55
[Download RAW message or body]

Chris Song wrote:
> 
> If you run tail -f access.log you'll see that the server received HTTP/1.0,
> not HTTP/1.1. I traced to code to the request() routine in
> LWP/Protocol/http.pm,
> line 112:
>     my $request_line = "$method $fullpath HTTP/1.0$CRLF";
> The string is harded-coded there. I'm using ActiveState Perl 620, the
> $LWP::VERSION
> is 5.48.

I forgot I modified that module a while back.  This is what I used:

    my $protocol = 'HTTP/1.0';
    $protocol = $request->{_protocol} if exists $request->{_protocol};
    my $request_line = "$method $fullpath $protocol$CRLF";

-- 
  ,-/-  __      _  _         $Bill Luebkert   ICQ=14439852
 (_/   /  )    // //       DBE Collectibles   http://www.wgn.net/~dbe/
  / ) /--<  o // //      Mailto:dbe@wgn.net   http://dbecoll.webjump.com/
-/-' /___/_<_</_</_    http://www.freeyellow.com/members/dbecoll/
_______________________________________________
Perl-Win32-Web mailing list
Perl-Win32-Web@listserv.ActiveState.com
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web

[prev in list] [next in list] [prev in thread] [next in thread]