use strict;
use warnings;
use feature qw (say switch);
use LWP;


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


#my $url = 'http://google.com';
my $url = 'https://kuix.de/';
 
my $ua = LWP::UserAgent->new();
	 $ua->agent('User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:18.0) Gecko/20100101 Firefox/18.0');
     $ua->show_progress('true');
     $ua->ssl_opts ( verify_hostname => '0', SSL_ca_file => 'CA.crt');	
     $ua->proxy( ['http'], 'http://user:pass@host:port' );


my $req = HTTP::Request->new( 'GET' => $url );
              
my $res = $ua->request($req);

$res->is_success or die "$url: ", $res->message, "\n"; 

say $res->content;