use SOAP::Lite  +trace =>  'debug';
my $wsurl =  'http://xxxxxxxx.com/SVC/services/Service?wsdl';
my $svc = SOAP::Lite-> service($wsurl);

$svc-> InsertData(@temparray);

##</code><code>##

use SOAP::Lite  +trace =>  'debug';
my $wsurl =  'http://xxxxxxxx.com/SVC/services/Service?wsdl';
my $svc = SOAP::Lite-> service($wsurl);
my @xmldata = SOAP::Data->type('xml' => @temparray);
$svc-> InsertData(@xmldata);

##</code><code>##

$VAR1 = bless( {
                 '_type' => 'xml',
                 '_signature' => [],
                 '_value' => [
                               '<?xml version="1.0" encoding="UTF-8"?>',
                               '<Data1>',
                               '<Data2>',
                               etc...
                             ],
                 '_attr' => {}
               }, 'SOAP::Data' );