diff options
Diffstat (limited to 'lib/LWPx/Protocol')
-rw-r--r-- | lib/LWPx/Protocol/http_paranoid.pm | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lib/LWPx/Protocol/http_paranoid.pm b/lib/LWPx/Protocol/http_paranoid.pm index e45fa1e..0d00b6f 100644 --- a/lib/LWPx/Protocol/http_paranoid.pm +++ b/lib/LWPx/Protocol/http_paranoid.pm @@ -5,7 +5,6 @@ package LWPx::Protocol::http_paranoid; use strict; -require LWP::Debug; require HTTP::Response; require HTTP::Status; require Net::HTTP; @@ -124,7 +123,6 @@ sub hlist_remove { sub request { my($self, $request, $proxy, $arg, $size, $timeout) = @_; - LWP::Debug::trace('()'); # paranoid: now $timeout means total time, not just between bytes coming in. # avoids attacker servers from tarpitting a service that fetches URLs. @@ -209,7 +207,6 @@ sub request my $n = $socket->syswrite($req_buf, length($req_buf)); die $! unless defined($n); die "short write" unless $n == length($req_buf); - #LWP::Debug::conns($req_buf); } my($code, $mess, @junk); @@ -373,7 +370,6 @@ sub request if (($peer_http_version eq "1.1" && !$connection{close}) || $connection{"keep-alive"}) { - LWP::Debug::debug("Keep the http connection to $host:$port"); $conn_cache->deposit("http", "$host:$port", $socket); } } |