Ticket::Simple(3) A basic ticket system.

VERSION

version v0.0.2

SYNOPSIS


my $ts=Ticket::Simple->new();

or

 my $ts=Ticket::Simple->new({ttl=>600});

DESCRIPTION

Provides a simple ticket system for creating, storing, fetching, comparing user assigned tickets.

SUBROUTINES/METHODS

create_ticket

wipe_ticket

destroy_ticket

fetch_ticket

is_ticket_equal_stored

is_ticket_valid

is_ticket_valid_now

Test if the ticket was issued

now

seed

store_ticket

log_cfg

set_ttl

get_ttl

DIAGNOSTICS

CONFIGURATION AND ENVIRONMENT

No external configuration needed.

DEPENDENCIES

  Carp;
  Class::Std
  Digest::MD5
  Log::Log4perl
  Readonly
  Time::HiRes
  version

INCOMPATIBILITIES

Not known.

BUGS AND LIMITATIONS

Not known.

AUTHOR

Christian Kuelker <[email protected]>

LICENSE AND COPYRIGHT

Copyright (C) 2009 by Christian Kuelker

This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version.

This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA