CatalystX::Usul::TraitFor::Captcha - Role to implement captchas
Describes v0.17.$Rev: 1 $
use CatalystX::Usul::Moose; extends qw(CatalystX::Usul::Model); with qw(CatalystX::Usul::TraitFor::Captcha); sub create_captcha { return shift->context->create_captcha; }
Implements create and validate methods for captchas
Requires the context attribute. Uses the key Plugin::Captcha in the $context->config hash
$context->config
$self->clear_captcha_string;
Deletes captcha_string from the session
$self->create_captcha
Generates the captcha image and sets the response body and headers. Stores the captcha string on the session
$self->validate_captcha( $string_to_verify );
Verifies that the supplied string matches the one stored on the session. Returns if it does, throws an exception if it does not
None
Depends on libgd2-noxpm and libgd2-noxpm-dev
libgd2-noxpm
libgd2-noxpm-dev
There are no known incompatibilities in this module
There are no known bugs in this module. Please report problems to the address below. Patches are welcome
Larry Wall - For the Perl programming language
Peter Flanigan, <Support at RoxSoft.co.uk>
<Support at RoxSoft.co.uk>
Copyright (c) 2014 Peter Flanigan. All rights reserved
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic
This program is distributed in the hope that it will be useful, but WITHOUT WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE
To install CatalystX::Usul, copy and paste the appropriate command in to your terminal.
cpanm
cpanm CatalystX::Usul
CPAN shell
perl -MCPAN -e shell install CatalystX::Usul
For more information on module installation, please visit the detailed CPAN module installation guide.