Select Code to Download

Select or download this

   $ua = LWP::UserAgent->new;
   $ua->cookie_jar ($cookie_jar={});  # instead of  $ua->cookie_jar ( 
+{} );
   $request = HTTP::Request->new('GET', "$RevAddr" );
   print "\$request = ", $request, "\n";
   print Dumper ($request), "\n";

Select or download this

$request = HTTP::Request=HASH(0x1080540)
$VAR1 = bless( {
                 '_content' => '',
...
                 '_headers' => bless( {}, 'HTTP::Headers' ),
                 '_method' => 'GET'
               }, 'HTTP::Request' );