- LICENSE AND COPYRIGHT
Authen::TuringImage - Image based Turing test (CAPTCHA)
$Revision: 1.008 $ $Date: Sat Oct 27 21:04:57 PDT 2018 $
use Authen::TuringImage; my $auth = new Authen::TuringImage; # Write challenge image to a file. my ($challenge) = $auth->challenge; open (CHALLENGE, "> challenge.jpg"); print CHALLENGE, $challenge->jpeg; close CHALLENGE; # Read and verify challenge response. my $response = <STDIN>; print $response eq $auth->response ? "OK" : "Failed";
This module implements an image based Turing test (aka "CAPTCHA") to help protect resources from automated access.
Creates and returns a new Authen::TuringImage object.
Returns an image for use as a Turing test challenge, as well as the text of the challenge, in that order, as a two element list. The user must read and enter the characters in the image.
Returns the correct response to the Turing image challenge.
<authen-ti at hash.neo.tc>
Please report any bugs or feature requests to
bug-authen-turingimage at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Authen-TuringImage. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
You can find documentation for this module with the perldoc command.
You can also look for information at:
RT: CPAN's request tracker
AnnoCPAN: Annotated CPAN documentation
Copyright (c) Ashish Gulhati.
This software package is Open Software; you can use, redistribute, and/or modify it under the terms of the Open Artistic License 1.0.
Please see http://www.opensoftwr.org/oal10.txt for the full license terms. By using or modifying this software, you indicate your agreement with the license terms.