package TestApp::Controller::Root; use strict; use warnings; __PACKAGE__->config(namespace => q{}); use base 'Catalyst::Controller::reCAPTCHA'; sub index :Private { my ($self, $c) = @_; $c->forward('captcha_get'); my $body ='

recaptcha error: '. $c->stash->{recaptcha_ok} . " " . $c->stash->{recaptcha_error} . '

'. $c->stash->{recaptcha}.'
'; $c->res->body($body); } sub check : Local { my ($self, $c) = @_; $c->forward('captcha_check'); $c->detach('index'); } 1;