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 \s-1GNU\s0 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 \s-1WITHOUT\s0 \s-1ANY\s0 \s-1WARRANTY\s0; without even the implied warranty of \s-1MERCHANTABILITY\s0 or \s-1FITNESS\s0 \s-1FOR\s0 A \s-1PARTICULAR\s0 \s-1PURPOSE\s0. See the \s-1GNU\s0 General Public License for more details.

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