The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

Name

CatalystX::Usul::TraitFor::Captcha - Role to implement captchas

Version

Describes v0.17.$Rev: 1 $

Synopsis

   use CatalystX::Usul::Moose;

   extends qw(CatalystX::Usul::Model);
   with    qw(CatalystX::Usul::TraitFor::Captcha);

   sub create_captcha {
      return shift->context->create_captcha;
   }

Description

Implements create and validate methods for captchas

Configuration and Environment

Requires the context attribute. Uses the key Plugin::Captcha in the $context->config hash

Subroutines/Methods

clear_captcha_string

   $self->clear_captcha_string;

Deletes captcha_string from the session

create_captcha

   $self->create_captcha

Generates the captcha image and sets the response body and headers. Stores the captcha string on the session

validate_captcha

   $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

Diagnostics

None

Dependencies

Class::Usul::Constraints
GD::SecurityImage

Depends on libgd2-noxpm and libgd2-noxpm-dev

HTTP::Date
Moose::Role

Incompatibilities

There are no known incompatibilities in this module

Bugs and Limitations

There are no known bugs in this module. Please report problems to the address below. Patches are welcome

Acknowledgements

Larry Wall - For the Perl programming language

Author

Peter Flanigan, <Support at RoxSoft.co.uk>

License and Copyright

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