package TestApp::Controller::TokenExpire;
use strict;
use warnings;
use Data::Dumper;
use base 'Catalyst::Controller::HTML::FormFu';
__PACKAGE__->config( {
'Controller::HTML::FormFu' => {
request_token_session_key => '_token',
request_token_enable => 1,
request_token_field_name => 'token',
request_token_expiration_time => -10
} } );
sub tokenexpire : Chained : CaptureArgs(0) {
my ( $self, $c ) = @_;
$c->stash->{template} = 'form.tt';
}
sub form : Chained('tokenexpire') : Args(0) : Form {
my ( $self, $c ) = @_;
my $form = $c->stash->{form};
$form->elements( [ { name => 'basic_form' }, { type => "Submit" } ] );
if ( $form->submitted_and_valid ) {
$c->res->body("VALID");
}
}
1;