my $db = $r->dir_config('CommentDB') || die "No DB root specified!"; my $uri = $cgi->param('uri'); my $action = $cgi->param('action') || 'view'; if ($action eq 'save') { my $ip = $r->get_remote_host(); AxKit::XSP::Comments::save_comment( $db, , $uri, $cgi->param('subject'), $cgi->param('text'), $cgi->param('texttype'), $ip, $cgi->param('parent_id'), ); $r->header_out(Location => "$uri"); return 302; } elsif ($action eq 'preview') { $uri $db $uri $cgi->param('subject') $cgi->param('text') $cgi->param('texttype') $cgi->param('parent_id') } elsif ($action eq 'view') { # view an individual comment, view all comments etc $uri $db $uri $cgi->param('commentid') } elsif ($action eq 'create') { $uri $db $uri $cgi->param('subject') $cgi->param('text') $cgi->param('texttype') $cgi->param('parent_id') } else { die "Invalid action"; }