Any help would be appreciated ... I tried to use SOAP::Lite to pass a query to a web service requesting data. Had any number of errors and sometimes no error just a response of '1' using the examples provided in the on line tutorials for SOAP::Lite.

I am able to run the same request using HTTP::Request and LWP::UserAgent modules in the code below. I'd still like to know how, if possible, to pass the same query using SOAP::Lite instead.

Thank you in advance.

###########################################################
require HTTP::Request;
require LWP::UserAgent;
   

#this gets the response from the iridium server
 $request = HTTP::Request->new(GET => 'https://www.NAME_OF_THE_SERVER/
+xml/service1.asmx/XmlResponse?request=<Request RequestTime="2009-09-0
+7T00:20:55+00:00" Server="JOHN_DOE"><Username>USERNAME</Username><Pas
+sword>PASSWORD</Password><DeliverData><MaxMessages>100</MaxMessages><
+/DeliverData></Request>');
 
 $ua = LWP::UserAgent->new;
 $response = $ua->request($request);

 print $response;
 print $response->as_string;

open (MYFILE, '>>C:\\perl\\webservice\\data.txt'); 

print MYFILE $response->as_string; 

close (MYFILE); 
###########################################################
[download]