#!C:\Perl64\bin\perl
use strict;
use warnings;
use Confluence::Client::XMLRPC;

my $version=2;
Confluence::Client::XMLRPC::setApiVersion($version);
Confluence::Client::XMLRPC::setRaiseError(1);
Confluence::Client::XMLRPC::setPrintError(1);

my $URL="https://jeeves.Mainoffice.Demoulas.Corp/rpc/xmlrpc/";
my $user="toms";
my $pass="password";

my $object = Confluence::Client::XMLRPC->new($URL,$user,$pass);

$object->logout();

##</code><code>##

XML-RPC ERROR: Unable to connect to https://jeeves.Mainoffice.Demoulas.Corp/rpc/xmlrpc 
at C:\Users\toms\Documents\Confluence\confluence.pl line 15

##</code><code>##

#!C:\Perl64\bin\perl
use warnings;
use strict;
use LWP::UserAgent;

my $ua=LWP::UserAgent->new(ssl_opts=>{ verify_hostname => 0});

my $req = HTTP::Request->new(GET => 'https://jeeves.mainoffice.demoulas.corp');

my $result = $ua->request($req);

if($result->is_success){
  print $result->content;
}else{
  print $result->status_line, "\n";
}