eval { $content = $response->decoded_content };
if ($content) { $response->content($content); }
####
*_utf8_downgrade = defined(&utf8::downgrade) ?
sub {
utf8::downgrade($_[0], 1) or
Carp::croak("HTTP::Message content must be bytes")
}
:
sub {
};
##
##
HTTP/1.x 200 OK
Date: Thu, 01 May 2008 02:30:39 GMT
Server: Apache
X-Powered-By: PHP/5.2.5
Cache-Control: private, s-maxage=0, max-age=0, must-revalidate
Content-Language: en
Vary: Accept-Encoding,Cookie
Expires: Thu, 01 Jan 1970 00:00:00 GMT
Content-Encoding: gzip
Content-Length: 12241
Content-Type: text/html; charset=utf-8
Connection: keep-alive