I have a script that make a request to a WCF service. It works when security is switched off but now they want to switch ntlm authentication on. What changes do I need to make to it?

#!/usr/bin/perl

package main;
use SOAP::Lite +trace;
use LWP::UserAgent;
use HTTP::Request::Common;

# Variables
my $url = 'http://../ProfileManager/100818/ProfileManager.svc?wsdl';
my $uri = 'urn:...:...:profilemanager:profilemanagerrequestmanager:100
+818';

my $soap = SOAP::Lite
    -> ns( 'http://www.w3.org/2001/XMLSchema-instance', 'xsi' )
    -> ns( 'urn:...:...:profilemanager:requestmanager', 'a' )
    -> ns( 'urn:...:...:profilemanager:contract:110308', 'b'  )
    -> uri($uri)
    -> on_action( sub { return 'urn:...:...:profilemanager:requestmana
+ger:100818.ProfileScopeServiceContract.ProcessMessage'; } )
    -> proxy($url);


my $method = SOAP::Data->name('Request')
    ->attr({xmlns => 'urn:...:...:profilemanager:profilemanagerrequest
+manager:100818'});



my @params = ( SOAP::Data->type("b:Organisation")->name("a:Payload")->
+value(
    \SOAP::Data->value(
    SOAP::Data->name("b:OrganisationUnitId")->value("..."),
    SOAP::Data->name("b:OrganisationDescription")->attr( { 'xsi:nil' =
+> "true" } ),
    SOAP::Data->name("b:IsCustomer")->attr( { 'xsi:nil' => "true" } ),
    SOAP::Data->name("b:IsDealer")->attr( { 'xsi:nil' => "true" } ),
    SOAP::Data->name("b:IsSupplier")->attr( { 'xsi:nil' => "true" } ),
    SOAP::Data->name("b:Domains")->attr( { 'xsi:nil' => "true" } ),
    SOAP::Data->name("b:AccountFormat")->attr( { 'xsi:nil' => "true" }
+ ),
    SOAP::Data->name("b:ShouldUserNameMatchEmailFormat")->attr( { 'xsi
+:nil' => "true" } ),
    SOAP::Data->name("b:ShouldUserNameHaveDomain")->attr( { 'xsi:nil' 
+=> "true" } ),
    SOAP::Data->name("b:ShouldEmailHaveDomain")->attr( { 'xsi:nil' => 
+"true" } )
    )
  ),
  SOAP::Data->name("a:ProcessingInstruction")->value(
  \SOAP::Data->value(
    SOAP::Data->name("b:Action")->value("GetOrganisationById"),
    SOAP::Data->name("b:Strategy")->value(
    \SOAP::Data->value(
    SOAP::Data->name("b:Name")->attr( { 'xsi:nil' => "true" } ),
    SOAP::Data->name("b:Paging")->attr( { 'xsi:nil' => "true" } ),
    SOAP::Data->name("b:SearchCriteria")->attr( { 'xsi:nil' => "true" 
+} )
    )
    ),
    SOAP::Data->name("b:Meta")->attr( { 'xsi:nil' => "true" } )
    )
    )
);

print $soap->call($method => @params)->result;
[download]