package MyApp::Controller::Logout;
use strict;
use warnings;
use base 'Catalyst::Controller';
=head1 NAME
MyApp::Controller::Logout - Catalyst Controller
=head1 DESCRIPTION
Catalyst Controller.
=head1 METHODS
=cut
=head2 index
Logout logic
=cut
sub index : Private {
my ($self, $c) = @_;
# Clear the user's state
$c->logout;
# Send the user to the starting point
$c->response->redirect($c->uri_for('/'));
}
=head1 AUTHOR
root
=head1 LICENSE
This library is free software, you can redistribute it and/or modify
it under the same terms as Perl itself.
=cut
1;