bfc3247583
git-cpan-module: SOAP-WSDL git-cpan-version: 2.00.07 git-cpan-authorid: MKUTTER git-cpan-file: authors/id/M/MK/MKUTTER/SOAP-WSDL-2.00.07.tar.gz
30 lines
513 B
Perl
30 lines
513 B
Perl
package testCodeFirst;
|
|
use strict; use warnings;
|
|
our $VERSION = 0.1;
|
|
use lib '../lib';
|
|
use base q{CodeFirst};
|
|
|
|
sub test :WebMethod(
|
|
action => "test",
|
|
returns => "bar",
|
|
header => "bam",
|
|
body => "baz"
|
|
) {
|
|
|
|
}
|
|
|
|
sub test2 :WebMethod(
|
|
action => "test2",
|
|
returns => "bar",
|
|
header => "bam",
|
|
body => "baz"
|
|
) {
|
|
}
|
|
|
|
package main;
|
|
use Data::Dumper;
|
|
my $test = testCodeFirst->new();
|
|
# print Dumper $test->_action_map;
|
|
|
|
print Dumper $test->get_transport()->get_action_map_ref();
|
|
1; |