From ff7b9de82908baf1d5f9af71e35dad2369bfdc2f Mon Sep 17 00:00:00 2001 From: Tobi Oetiker Date: Wed, 14 Nov 2007 17:33:19 +0000 Subject: initial qooxdoo drop for smokeping --- qooxdoo/source/jsonrpc.cgi | 26 ++++++++++++++++++++++++++ 1 file changed, 26 insertions(+) create mode 100755 qooxdoo/source/jsonrpc.cgi (limited to 'qooxdoo/source/jsonrpc.cgi') diff --git a/qooxdoo/source/jsonrpc.cgi b/qooxdoo/source/jsonrpc.cgi new file mode 100755 index 0000000..372273d --- /dev/null +++ b/qooxdoo/source/jsonrpc.cgi @@ -0,0 +1,26 @@ +#!/usr/sepp/bin/perl-5.8.8 -w +use strict; +use lib qw( perl ); + +use CGI; +use CGI::Session; +use Qooxdoo::JSONRPC; + +$Qooxdoo::JSONRPC::debug=1; + +# Change this space-separated list of directories to include +# Qooxdoo::JSONRPC.pm and co-located Services + +# If this module can't be found, the previous line is incorrect + +# Instantiating the CGI module which parses the HTTP request + +my $cgi = new CGI; +my $session = new CGI::Session; + +# You can customise this harness here to handle cases before treating +# the request as being JSON-RPC + +Qooxdoo::JSONRPC::handle_request ($cgi, $session); + + -- cgit v1.2.3-24-g4f1b