import SOAP-WSDL 2.00.02 from CPAN
git-cpan-module: SOAP-WSDL git-cpan-version: 2.00.02 git-cpan-authorid: MKUTTER git-cpan-file: authors/id/M/MK/MKUTTER/SOAP-WSDL-2.00.02.tar.gz
This commit is contained in:
committed by
Michael G. Schwern
parent
745ce925c1
commit
915ee03cbe
@@ -0,0 +1,15 @@
|
||||
package Mod_Perl2Test;
|
||||
use strict; use warnings;
|
||||
use Class::Std::Fast;
|
||||
|
||||
sub sayHello {
|
||||
my ($self, $body, $header) = @_;
|
||||
my $name = $body->get_name();
|
||||
my $givenName = $body->get_givenName();
|
||||
|
||||
die "FOO" if ($name eq '__DIE__');
|
||||
|
||||
return MyElements::sayHelloResponse->new({
|
||||
sayHelloResult => "Hello $givenName $name"
|
||||
})}
|
||||
1;
|
||||
Reference in New Issue
Block a user