plankton@ubuntu:/usr/lib/cgi-bin$ cat fcresponder.cgi 
#!/usr/bin/perl -w
use strict;
use Frontier::Responder; 
use CGI;

my $cgi	= new CGI;
my $xml	= $cgi->param('POSTDATA');

my $res = Frontier::Responder->new( methods => {
                                                 sum => sub{ $_[0] + $_[1] },
                                                 add => sub{ $_[0] + $_[1] },
                                                 cat => sub{ $_[0] . $_[1] },
                                                },
                                    );
print $res->answer;