#!/usr/bin/perl package MyComplexType; use strict; use Class::Std::Storable; use lib '../../lib'; use SOAP::WSDL::XSD::Typelib::ComplexType; use base ('SOAP::WSDL::XSD::Typelib::ComplexType'); my %MyTestName_of :ATTR(:get); __PACKAGE__->_factory( [ qw(MyTestName) ], # order { MyTestName => \%MyTestName_of }, # attribute lookup map { MyTestName => 'SOAP::WSDL::XSD::Typelib::Builtin::string' } # class name lookup map ); sub get_xmlns { 'urn:Test' }; 1;