NAME

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

INHERITANCE

XML::Compile::Transport::SOAPHTTP
  is a XML::Compile::Transport

SYNOPSIS

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);

DESCRIPTION

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.

METHODS

Constructors

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.

Accessors

$obj->address

$obj->addresses

$obj->charset

$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.

Handlers

$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

    . 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.

DETAILS

SEE ALSO

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

All modules in this suite: XML::Compile, XML::Compile::SOAP, XML::Compile::SOAP12, XML::Compile::SOAP::Daemon, XML::Compile::SOAP::WSA, XML::Compile::Tester, XML::Compile::Cache, XML::Compile::Dumper, XML::Compile::RPC, and XML::Rewrite, XML::ExistDB, XML::LibXML::Simple.

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

LICENSE

Copyrights 2007-2010 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