File Coverage

example/lib/MyElements/sayHello.pm

Criterion	Covered	Total	%
statement	15	16	93.7
branch			n/a
condition			n/a
subroutine	5	6	83.3
pod	0	1	0.0
total	20	23	86.9

package MyElements::sayHello;
use strict;
use warnings;

{ # BLOCK to scope variables

sub get_xmlns { 'urn:HelloWorld' }

__PACKAGE__->__set_name('sayHello');
__PACKAGE__->__set_nillable();
__PACKAGE__->__set_minOccurs();
__PACKAGE__->__set_maxOccurs();
__PACKAGE__->__set_ref();

use base qw(
    SOAP::WSDL::XSD::Typelib::Element
    SOAP::WSDL::XSD::Typelib::ComplexType
);
use Class::Std::Fast::Storable constructor => 'none';
use base qw(SOAP::WSDL::XSD::Typelib::ComplexType);

Class::Std::initialize();

{ # BLOCK to scope variables

my %name_of :ATTR(:get);
my %givenName_of :ATTR(:get);

__PACKAGE__->_factory(
    [ qw(
        name
        givenName
    ) ],
    {
        name => \%name_of,
        givenName => \%givenName_of,
    },
    {
        name => 'SOAP::WSDL::XSD::Typelib::Builtin::string',
        givenName => 'SOAP::WSDL::XSD::Typelib::Builtin::string',
    }
);

} # end BLOCK







} # end of BLOCK
1;

# __END__

=pod

=head1 NAME

MyElements::sayHello

=head1 DESCRIPTION

Perl data type class for the XML Schema defined element
sayHello from the namespace urn:HelloWorld.

=head1 METHODS

=head2 new

 my $element = MyElements::sayHello->new($data);

Constructor. The following data structure may be passed to new():

 {
   name =>  $some_value, # string
   givenName =>  $some_value, # string
 },

=head1 AUTHOR

Generated by SOAP::WSDL

=cut