my $soap = SOAP::Transport::HTTP::Server
	    -> new(%args) 
	    -> dispatch_to(@classes);
     $soap->request($request);
     $soap->handle;
     my $response = $soap->response;
    
##</code><code>##

my $soap = SOAP::WSDL->new();
$soap->wsdl('file:/path/to/file.wsdl'); 
$soap->proxy('http://server/service.cgi');
$soap->wsdlinit(caching => 1);