Egg::Plugin::Authen::Captcha - Plugin for Authen::Captcha.

  use Egg qw/ Authen::Captcha /;

  # The validation code is obtained.
  my $md5hex= $e->authc->generate_code(5);

  # It preserves it in the session.
  $e->session->{authen_capcha}= $md5hex;

  # The attestation image is displayed.
  <img src="/authen_captcha/<% $md5hex %>.png" />

  # Check on input code
  my $in= $e->req->param('auth_code') || return 'I want input of auth_code.';
  $in eq $e->session->{authen_capcha} || return 'auth_code is not corresponding.';

It is a plug-in to attest capture.

see Authen::Captcha.

Please set it with the key named 'plugin_authen_captcha'.

  plugin_authen_captcha => {
    data_folder   => '<e.dir.etc>/AuthCaptcha',
    output_folder => '<e.dir.static>/AuthCaptcha',
    width         => 30,
    height        => 40,
    },

All set values are passed by the constructor of Authen::Captcha.

see Authen::Captcha.

Authen::Captcha object is returned.

  my $ac= $e->authc;

Authen::Captcha, Class::Data::Inheritable, Egg::Release,

Masatoshi Mizuno <lushe&64;cpan.org>

Copyright (C) 2008 Bee Flag, Corp. <http://egg.bomcity.com/>, All Rights Reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.6 or, at your option, any later version of Perl 5 you may have available.