On Wed, 27 Feb 2002, Rizwan Majeed wrote:

> I am using the mod-perl handler for soap.  I wasnt sure how to test it.
> Can any body tell me how to test the service I make.

Hi.

I was playing with this stuff yesterday, so here are some points from 
someone who's new to this stuff

First off, there's an example in the mod_perl cookbook.  See chapter 15,
secion 15.16 "Creating a SOAP server".  In particular, the listing you
might want to take a look at is the example of a script that calls thier
soap server server.

http://www.modperlcookbook.org/code/ch15/HalfLife-QueryServer-0.10/eg/querysoap.pl

Secondly, have a look at Leon Brocard's stuff at  
http://www.astray.com/services/  This is a further example of using SOAP - 
this time to call a infobot.

Basically what you want to do from your client is

#!/usr/bin/perl

use SOAP::Lite +autodispatch =>
  uri   => 'Some unique uri to identify your request',
  proxy => 'The url that is in your Location in httpd.conf';

my $object = NameOfMySOAPedModule->new();
$object->a_method();
$object->an_other_method();

> MORE Importantly. how should I make sure the handler is invoked. I think
> it is not being invoked. I have also copied the package in the perls
> @INC path "/..../site_perl". The package has a handler function that
> should be invoked.

Try GETing the url.  Assuming you have LWP installed:

[mark@pate mark]$ GET http://2shortplanks.com/mod_soap
<HTML>
<HEAD><TITLE>An Error Occurred</TITLE></HEAD>
<BODY>
<H1>An Error Occurred</h1>
405 Method Not Allowed
</BODY>
</HTML>

For a simple GET if the handler is being called you should get the 405 
(as you didn't issue a proper soap request.)

-- 
s''  Mark Fowler                                     London.pm   Bath.pm
     http://www.twoshortplanks.com/              [EMAIL PROTECTED]
';use Term'Cap;$t=Tgetent Term'Cap{};print$t->Tputs(cl);for$w(split/  +/
){for(0..30){$|=print$t->Tgoto(cm,$_,$y)." $w";select$k,$k,$k,.03}$y+=2}

Reply via email to