XML::Compile::Transport::SOAPHTTP - exchange XML-SOAP via HTTP

 XML::Compile::Transport::SOAPHTTP
   is a XML::Compile::Transport
   is a XML::Compile::SOAP::Extension

 use XML::Compile::Transport::SOAPHTTP;

 my $http = XML::Compile::Transport::SOAPHTTP->new(@options);
 my $send = $http->compileClient(@options2);

 my $call = $wsdl->compileClient
   ( operation => 'some-port-name'
   , transport => $send
   );

 my ($xmlout, $trace) = $call->($xmlin);

This module handles the exchange of (XML) messages, according to the rules of SOAP (any version). The module does not known how to parse or compose XML, but only worries about the HTTP aspects.

XML::Compile::Transport::SOAPHTTP->new(OPTIONS)

The keep_alive and timeout options are used when an LWP::UserAgent is created, and ignored when you provide such an object. In the latter case, the values for those are inquired such that you can see the setting directly from the passed object.

If you need to change UserAgent settings later, you can always directly access the LWP::UserAgent object via userAgent().

 -Option    --Defined in     --Default
  address     XML::Compile::Transport  'http://localhost'
  charset     XML::Compile::Transport  'utf-8'
  keep_alive                   <true>
  timeout                      180
  user_agent                   <created when needed>

address => URI|ARRAY-of-URI

charset => STRING

keep_alive => BOOLEAN

When connection can be re-used.

timeout => SECONDS

The maximum time for a single connection before the client will close it. The server may close it earlier. Do not set the timeout too long, because you want objects to be cleaned-up.

user_agent => LWP::UserAgent object

If you pass your own user agent, you will be able to configure it. Otherwise, one will be created with all the defaults. Providing your own user agents -or at least have a look at the configuration- seems like a good idea.

$obj->wsdl11Init(WSDL, ARGS)

XML::Compile::Transport::SOAPHTTP->wsdl11Init(WSDL, ARGS)

See "WSDL11" in XML::Compile::SOAP::Extension

$obj->soap11ClientWrapper(OPERATION, CALL, ARGS)

See "SOAP11" in XML::Compile::SOAP::Extension

$obj->soap11HandlerWrapper(OPERATION, CALLBACK, ARGS)

See "SOAP11" in XML::Compile::SOAP::Extension

$obj->soap11OperationInit(OPERATION, ARGS)

XML::Compile::Transport::SOAPHTTP->soap11OperationInit(OPERATION, ARGS)

See "SOAP11" in XML::Compile::SOAP::Extension

$obj->address

See "Accessors" in XML::Compile::Transport

$obj->addresses

See "Accessors" in XML::Compile::Transport

$obj->charset

See "Accessors" in XML::Compile::Transport

$obj->userAgent([AGENT|(undef, OPTIONS)])

Returns the User Agent which will be used. You may change the configuration of the AGENT (the returned LWP::UserAgent object) or provide one yourself. See also new(user_agent).

Changes to the agent configuration can be made before or after the compilation, or even inbetween SOAP calls.

$obj->compileClient(OPTIONS)

Compile an HTTP client handler. Returned is a subroutine which is called with a text represenation of the XML request, or an XML::LibXML tree. In SCALAR context, an XML::LibXML parsed tree of the answer message is returned. In LIST context, that answer is followed by a HASH which contains trace information.

 -Option   --Defined in     --Default
  action                      ''
  header                      <created>
  hook       XML::Compile::Transport  <undef>
  kind                        'request-response'
  method                      'POST'
  mime_type                   <depends on soap version>
  mpost_id                    42
  soap                        'SOAP11'

action => URI

header => HTTP::Headers object

Versions of XML::Compile, XML::Compile::SOAP, and LWP will be added to simplify bug reports.

hook => CODE

kind => DIRECTION

What kind of interactie, based on the four types defined by WSDL(1): notification-operation (server initiated, no answer required), one-way (client initiated, no answer required), request-response (client initiated, the usual in both directions), solicit-response (server initiated "challenge").

method => 'POST'|'M-POST'

With POST, you get the standard HTTP exchange. The M-POST is implements the (Microsoft) HTTP Extension Framework. Some servers accept both, other require a specific request.

mime_type => STRING

mpost_id => INTEGER

With method M-POST, the header extension fields require (any) number to be grouped.

soap => 'SOAP11'|'SOAP12'|OBJECT

example: create a client

 my $trans = XML::Compile::Transport::SOAPHTTP->new
   ( address => 'http://www.stockquoteserver.com/StockQuote'
   );

 my $call = $trans->compileClient
   ( action  => 'http://example.com/GetLastTradePrice'
   );

 # $request and $answer are XML::LibXML trees!
 # see XML::Compile::SOAP::Client::compileClient() for wrapper which
 # converts from and to Perl data structures.

 my ($answer, $trace) = $call->($request);
 my $answer = $call->($request); # drop $trace info immediately

$obj->headerAddVersions(HEADER)

XML::Compile::Transport::SOAPHTTP->headerAddVersions(HEADER)

Adds some lines about module versions, which may help debugging or error reports. This is called when a new client or server is being created.

XML::Compile::Transport::SOAPHTTP->register(URI)

See "Helpers" in XML::Compile::Transport

This module is part of XML-Compile-SOAP distribution version 2.24, built on June 20, 2011. Website: http://perl.overmeer.net/xml-compile/

Other distributions in this suite: XML::Compile, XML::Compile::SOAP, XML::Compile::SOAP12, XML::Compile::SOAP::Daemon, XML::Compile::SOAP::WSA, XML::Compile::C14N, XML::Compile::WSS, XML::Compile::Tester, XML::Compile::Cache, XML::Compile::Dumper, XML::Compile::RPC, XML::Rewrite, XML::eXistDB, and XML::LibXML::Simple.

Please post questions or ideas to the mailinglist at http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/xml-compile For live contact with other developers, visit the #xml-compile channel on irc.perl.org.

Copyrights 2007-2011 by Mark Overmeer. For other contributors see ChangeLog.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See http://www.perl.com/perl/misc/Artistic.html