use strict;
use warnings;

use LWP::UserAgent;

my $pw_ticketsystem='abcdefg';
my $us_ticketsystem='1234567';
my $url = "https://url/CallLog";
my $response;

my $ua = LWP::UserAgent->new;

$ua->requests_redirectable(undef); # Redirects ausschalten!
$ua->credentials("url-server:443", "realm", $us_ticketsystem, $pw_ticketsystem);

$ENV{HTTPS_PROXY}          = 'proxyserver';
$ENV{HTTPS_PROXY_USERNAME} = 'username';
$ENV{HTTPS_PROXY_PASSWORD} = 'passsword';

my $response = $ua->post($url,
[
     0=>0,
     1=1,
     2=2
]);

print $response->status_line;