perl -d -e '
use Net::SSL;
use LWP::Debug qw(+);
use LWP::UserAgent;
use HTTP::Headers;
use HTTP::Request;

$ENV{HTTPS_DEBUG} = 1;
$ENV{'PERL_LWP_SSL_VERIFY_HOSTNAME'} = 0;

my $http_read_size_hint = 1 << 20;

my $req = HTTP::Request->new('GET', "https://<hostname>/webservices/");
my $ua = LWP::UserAgent->new(timeout=>5);
my $response = $ua->request($req);
print $response->as_string();
'