help with arrays

Florida Estrella <[email protected]> Wed, 24 Mar 2004 10:39:12 +0100
Newsgroups gmane.comp.windows.devel.soap.general
Message-ID <[email protected]>
The following is the incoming SOAP message (pay attention to the
metadata tag which is an array of strings)


<?xml version="1.0" encoding="UTF-8"?>
<soapenv:Envelope
xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/"
xmlns:xsd="http://www.w3.org/2001/XMLSchema"
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
  <soapenv:Body>
   <ns1:updateTagValue
soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:ns1="AliEn/Service/Interface">
    <directory
xsi:type="xsd:string">/mammogrid/oxford/patients/patCL-005</directory>
    <tagname xsi:type="xsd:string">PatientsV0</tagname>
    <metadata xsi:type="soapenc:Array" soapenc:arrayType="xsd:string[3]"
xmlns:ns2="http://xml.apache.org/xml-soap"
xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/">
     <item>PatientId=CL-005</item>
     <item>Gender=F</item>

<item>EncryptedDateOfBirth=4270bbaeebe841e016107a8deba3da039580e5b2673f183746132586ae9ebc54eceb3a494b9c16d9d1f791eefd13190052e65b0738de2c8448d45a1ecf8736092741f6a066448ed1bc99f3413e935ced6926ad19ace48c621d924a4b6b71f55fd97f08a302cea56a14a9a56177f67b9bf2a8419c5699741c117b50e3d9be2a3a</item>
    </metadata>
   </ns1:updateTagValue>
  </soapenv:Body>
</soapenv:Envelope>




On the perl end -

sub updateTagValue
{
     my $this = shift;
     my $directory = shift;
     my $tagName = shift;
     my @vars=@_;

     $self->{LOGGER}->info( "Interface", "Executing
updateTagValue($directory, $tagName, $#_, $#vars, @vars)");



This prints

Executing updateTagValue(/mammogrid/oxford/patients/patCL-005,
PatientsV0, 0, 0, ARRAY(0x8f8bce8))


Array size is 0. The array is not being received by perl properly...

Help anyone????
Florida