Catalyst::Plugin::XMLRPC - DEPRECATED Dispatch XMLRPC methods with Catalyst
# Include it in plugin list
use Catalyst qw/XMLRPC/;
# Public action to redispatch somewhere in a controller
sub entrypoint : Global : Action('XMLRPC') {}
# Methods with XMLRPC attribute in any controller
sub echo : XMLRPC('myAPI.echo') {
my ( $self, $c, @args ) = @_;
return RPC::XML::fault->new( 400, "No input!" ) unless @args;
return join ' ', @args;
}
sub add : XMLRPC {
my ( $self, $c, $a, $b ) = @_;
return $a + $b;
}
This plugin is DEPRECATED. Please do not use in new code.
This plugin allows your controller class to dispatch XMLRPC
methods from its own class.
Call this method from a controller action to set it up as a endpoint.
Catalyst::Manual, Catalyst::Test, Catalyst::Request, Catalyst::Response,
Catalyst::Helper, RPC::XML
Sebastian Riedel, "sri@oook.de" Marcus
Ramberg, "mramberg@cpan.org" Christian
Hansen Yoshinori Sano Michiel Ootjers Jos Boumans
Copyright (c) 2005 the Catalyst::Plugin::XMLRPC "AUTHORS" as listed
above.
This library is free software, you can redistribute it and/or modify it under
the same terms as Perl itself.