Our Perl clients will need some help with serialized Java Collections
We'll shove a method in SOAP::Lite's deserializer
package Arachna::SOAP::Vector;
BEGIN {
    sub SOAP::XMLSchemaApacheSOAP::Deserializer::as_Vector {
        my $self = shift;
        [ map { scalar(($self->decode_object($_))[1]) } @{$_[3] || []} ];
    } # as_Vector
}
1;
Since our Java SOAP service is providing a Vector object (which is really just an array), we'll need to coerce Perl into giving us the array it should be.
Slide 44 of 58 Contents
  1 |   2 |   3 |   4 |   5 |   6 |   7 |   8 |   9 | 10
11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20
21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30
31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40
41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | 50
51 | 52 | 53 | 54 | 55 | 56 | 57 | 58
www.arachna.com > Educational Resources > Tutorials > O'Reilly Open Source Conference (2002) > Exchanging Objects and Messages With SOAP

spidaman
© 2002-2009 Ian Kallen | Copyright Notice