SYNOPSIS

     use LWP::UserAgent::Patch::LogResponse
         -log_response_header  => 1, # default 1
         -log_response_body    => 1, # default 0
         -decode_response_body => 1, # default 1, turn off, e.g. to get raw gzipped content
     ;
    
     # now all your LWP HTTP responses are logged

    Sample script and output:

     % TRACE=1 perl -MLog::ger::Output::Screen -MLWP::UserAgent::Patch::LogResponse \
       -MLWP::Simple -e'get "http://localhost:5000/"'
     [261] HTTP response header:
     200 OK
     Date: Mon, 20 Aug 2012 07:47:46 GMT
     Server: HTTP::Server::PSGI
     Content-Length: 13
     Content-Type: text/plain
     Client-Date: Mon, 20 Aug 2012 07:47:46 GMT
     Client-Peer: 127.0.0.1:5000
     Client-Response-Num: 1

DESCRIPTION

    This module patches LWP::UserAgent (which is used by LWP::Simple,
    WWW::Mechanize, among others) so that HTTP responses are logged using
    Log::ger.

    Response body is logged in category LWP_Response_Body.* so it can be
    separated. For example, to dump response body dumps to directory
    instead of file:

     use Log::ger::Output Composite => (
         category_level => {LWP_Response_Body => 'off'},
         outputs        => {
             Dir => {
                 conf  => { path => "/path/to/dir" },
                 level => 'off',
                 category_level => {LWP_Response_Body => 'trace'},
             },
         }
     );

FAQ

 Why not subclass?

    By patching, you do not need to replace all the client code which uses
    LWP (or WWW::Mechanize, etc).

SEE ALSO

    Use Net::HTTP::Methods::Patch::LogRequest to log raw HTTP requests
    being sent to servers.