I wrote:
In a LWP application I'm just writing I have found a surprising
behaviour: Responses created by HTTP::Response::new and written to
disk with HTTP::Response::as_string can't be successfully parsed by
HTTP::Response::Parse.
Addendum:
HTTP::Response::clone doesn't clone the protocol either.
This, however, can be fixed easily:
--- Response.pm.1.50 2004-12-02 21:36:42.437500000 +0100
+++ Response.pm 2004-12-02 21:37:18.343750000 +0100
@@ -47,4 +47,5 @@
my $self = shift;
my $clone = bless $self->SUPER::clone, ref($self);
+ $clone->protocol($self->protocol);
$clone->code($self->code);
$clone->message($self->message);
--
Cheers,
haj
