or download this
use SOAP::Lite +trace => 'debug';
my $xml_post = qq~<upper1><var1>val1</var1><var2>val2<var2></upper1>
+~;
my $soap = SOAP::Lite
->service('http://www.path_to_wsdl'); # Microsoft.Net service
my $post_result = $soap->MethodCall($xml_post);