Catalyst::Plugin::XMLRPC - Dispatch XMLRPC methods with Catalyst
# Include it in plugin listuse Catalyst qw/XMLRPC/;# Public action to redispatch somewhere in a controllersub entrypoint : Global {my ( $self, $c ) = @_;# Redispatch to XMLRPC methods by calling this method$c->xmlrpc;}# Methods with XMLRPC attribute in any controllersub 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 allows your controller class to dispatch XMLRPC methods from its own class.
$c->xmlrpc Call this method from a controller action to set it up as a endpoint.
setup_dispatcher Catalyst::Manual, Catalyst::Test, Catalyst::Request, Catalyst::Response, Catalyst::Helper, RPC::XML Sebastian Riedel, "[email protected]" Marcus Ramberg, "[email protected]" Christian Hansen Yoshinori Sano Michiel Ootjers Jos Boumans This library is free software, you can redistribute it and/or modify it under the same terms as Perl itself. Hey! The above document had some coding errors, which are explained below: =back without =over