░▒▓████████████████████████████████▓▒░ ░▒▓█ ▓▒░ ░▒▓█ ~ S W A M P ~ ▓▒░ ░▒▓█ ▓▒░ ░▒▓████████████████████████████████▓▒░
lon105.truehost.cloud
LOCATION:
/usr/share/perl5/vendor_perl/LWP/Debug
☗ ROOT
↻ REFRESH
✎ CARVE FLESH
EDITING: TraceHTTP.pm
package LWP::Debug::TraceHTTP; # Just call: # # require LWP::Debug::TraceHTTP; # LWP::Protocol::implementor('http', 'LWP::Debug::TraceHTTP'); # # to use this module to trace all calls to the HTTP socket object in # programs that use LWP. use strict; use base 'LWP::Protocol::http'; our $VERSION = '6.34'; package # hide from PAUSE LWP::Debug::TraceHTTP::Socket; use Data::Dump 1.13; use Data::Dump::Trace qw(autowrap mcall); autowrap("LWP::Protocol::http::Socket" => "sock"); sub new { my $class = shift; return mcall("LWP::Protocol::http::Socket" => "new", undef, @_); } 1;
CANCEL
Name
Type
Size
Modified
Actions
↩ ..
DIR
—
—
📄 TraceHTTP.pm
PM
599 B
2018-06-05 18:49
EDIT