my $object = $factory->instantiate('My::User', id => 'uid=semancik,ou=people,o=bgs,c=sk');
print $object->realName; # read attribute
$object->realName('Radovan Semancik'); # Set attribute

##</code><code>##

# server

my $server = SOAP::Transport::HTTP::Apache->new;
$server->dispatch_with({
	'http://jewels.bgs.sk/Factory' => $factory,
});

sub handler { $server->handler(@_) };


# client

my $soap = SOAP::Lite
	->uri('http://jewels.bgs.sk/Factory')
	->proxy('http://jewels.bgs.sk/soap');

my $object = $soap->instantiate('My::User','whateverId')->result;