<?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 @[EMAIL PROTECTED];
$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
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>