Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

Made a change based on the patch from RT#34019, so that the full HTTP…

… response

message is extracted from the response line. (See
https://rt.cpan.org/Ticket/Display.html?id=34019)
  • Loading branch information...
commit 14e44bed9e7b49b79ac2bfdc76eee3b0902f2283 1 parent bb49a75
Randy J. Ray authored

Showing 1 changed file with 1 addition and 1 deletion. Show diff stats Hide diff stats

  1. +1 1  Parser.pm
2  Parser.pm
@@ -231,7 +231,7 @@ sub _parse_header {
231 231 if ($request =~ /^HTTP\/(\d+)\.(\d+)/i) {
232 232 die 'HTTP responses not allowed' unless $self->{response};
233 233 ($major,$minor) = ($1,$2);
234   - my (undef, $state, $msg) = split / /,$request;
  234 + my (undef, $state, $msg) = split / /, $request, 3;
235 235 $obj = $self->{obj} = HTTP::Response->new($state, $msg);
236 236
237 237 # perhaps a request?

0 comments on commit 14e44be

Please sign in to comment.
Something went wrong with that request. Please try again.