1029843 CON12347 ##

##

my $param = SOAP::Data->name("ListOfAccountContactInterface" => \SOAP::Data->value(
SOAP::Data->name("Account" => \SOAP::Data->value(
SOAP::Data->name("CompanyId" => '1029843'),
SOAP::Data->name("ListOfContact" => \SOAP::Data->value(
SOAP::Data->name("Contact" => \SOAP::Data->value(
SOAP::Data->name("" => 'CON12347')
   ))
  ))
 ))
)); 

##

##

my $soap_result = SOAP::Lite
-> service('file:/home/wsdl/Contact_Interface.wsdl') 
-> ContactInsertOrUpdate($param);