use strict;
use warnings;
use LWP::UserAgent;
use HTTP::Request::Common;
use Authen::NTLM;
use LWP::ConsoleLogger::Everywhere;
ntlmv2(1);

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

$ua->credentials(internal.com:9004', '', 'user', 'pass');

my $req = GET “https://internal.com:9004/api”;