Select Code to Download

./complex.pl
document/literal support is EXPERIMENTAL in SOAP::Lite at /usr/local/s
+hare/perl/5.8.7/SOAP/Lite.pm line 2818.
Type 'PublishRequest' can't be found in a schema class 'SOAP::Serializ
+er'

<?xml version="1.0" encoding="UTF-8"?>
<definitions
...
    </service>

</definitions>

package PublishRequestType;
use strict;
...
    my $self = $class->SUPER::new($data, $obj_fields);
    return bless($self, $class);
}

#!/usr/bin/perl -w

...
    });

$soap->publish($request_obj->as_soap_data);

<?xml version="1.0" encoding="UTF-8"?>
<SOAP:ENV
...
    </namesp2:BrokerMessage>
  </namesp1:PublishRequest>
</SOAP:ENV>