my $xml = '<primary xsi:type="typens:LoginInfo">
				 <username xsi:type="xsd:string">myusername</username>
				 <password xsi:type="xsd:string">mypwd</password>				 
			 </primary>
			 <securityid xsi:type="xsd:string">123456789</securityid>
			 <personalinfo xsi:type="typens:PersonalInfo">
				 <pin xsi:type="xsd:string">1554</pin>
				 <street xsi:type="xsd:string">123 test st</street>
				 <contact xsi:type="xsd:string">John Down</contact>
			 </personalinfo>';

my $response=  SOAP::Lite
				-> service('https://mydomain.com/service.wsdl')    						
				-> outputxml(1)
				
				-> newAccount( SOAP::Data->type('xml' => $xml) );

print $response;