Help for this page

Select Code to Download


  1. or download this
    package MyHTTP; 
use base qw(LWP::Protocol::http); 
...
LWP::Protocol::implementor( 'http', 'MyHTTP' );

1;
  2. or download this
    push @LWP::Protocol::http::EXTRA_SOCK_OPTS,
     LocalAddr => $ENV{LWP_LOCAL_ADDR}
   if exists $ENV{LWP_LOCAL_ADDR};