Yet Another CPAN Grep

RPC-Any-Interface-PSGI ( S/SH/SHERWIN/RPC-Any-Interface-PSGI-0.03.tar.gz, SHERWIN, 2011; MetaCPAN )

RPC-Any-Interface-PSGI/lib/RPC/Any/Server/JSONRPC/PSGI.pm ( view source; MetaCPAN )

package RPC::Any::Server::JSONRPC::PSGI;
use strict;
use warnings;

use Moose;
extends 'RPC::Any::Server::JSONRPC::HTTP';
with 'RPC::Any::Interface::PSGI';

__PACKAGE__->meta->make_immutable;

1;

__E

ND__

=head1 NAME

RPC::Any::Server::JSONRPC::PSGI - JSON-RPC server for a PSGI environment

=head1 SYNOPSIS

  # in app.psgi
  use RPC::Any::Server::JSONRPC::PSGI;

  # Create a server where calling

Foo.bar will call My::Module->bar.
  my $server = RPC::Any::Server::JSONRPC::PSGI->new(
      dispatch  => { 'Foo' => 'My::Module' },
      allow_get => 0,
  );

  my $handler = sub{ $server->handle_i