Perl で TypeKey 認証

  http://memo.xight.org/2006-01-18-4

  Authen-TypeKey は手軽でよさげ．

use CGI;
use Authen::TypeKey;

my $q = CGI->new;
my $tk = Authen::TypeKey->new;
$tk->token('typekey-token');
my $res = $tk->verify($q) or die $tk->errstr;

- Authen-TypeKey
  http://search.cpan.org/~btrott/Authen-TypeKey-0.05/lib/Authen/TypeKey.pm