my $ua = LWP::Protocol::https::Socket->new( PeerAddr => 'somewhere.example.com', PeerPort => 443, Proto => 'tcp', Timeout => 180, KeepAlive => '', SendTE => 1 );