#1 Pass additional parameters to handle()

[Byrne Reese]

In the following code sample:

use SOAP::Transport::HTTP;

SOAP::Transport::HTTP::CGI
->dispatch_to('SessionReport')
->handle();

BEGIN {
package SessionReport;
use strict;
use vars qw(@ISA);
@ISA = qw(SOAP::Server::Parameters);
sub getSessionReport {
my $self = shift;
my $envelope = pop;
# do my thing
# Where can I get a handle to the HTTP layer from here?
}
}

<b>Notice the comments. Alternatively, it would be cool
if the cgi at the top level could pass additional
parameters into the subroutine handling the
request.</b> For example:

SOAP::Transport::HTTP::CGI
->dispatch_to('SessionReport')
->handle("foo","bar");