| Subject: | status line parsing |
Hi,
The current code to parse out the status line doesn't work probably. If in the first stream buffer coming in it can not match the status line, it clears the buffer and ends up putting everything in $res->content. Here is a patch that fixes this.
Cheers,
Scott
--- HTTP.pm 2004-02-27 10:59:36.000000000 -0800
+++ /usr/lib/perl5/site_perl/5.8.3/POE/Component/Client/HTTP.pm 2004-03-26 14:53:15.000000000 -0800
@@ -828,6 +828,10 @@
$request->[REQ_RESPONSE] = HTTP::Response->new();
$request->[REQ_STATE] = RS_IN_CONTENT;
}
+ else {
+ # We need more data to match the status line
+ return;
+ }
}
# Parse the input for headers. This isn't in an else clause because