---
name: "Ticket::Simple"
section: "3pm"
platform: "linux"
package: "libticket-simple-perl"
version: "0.0.2-4.1"
release: "Debian 11 (Bullseye)"
platforms: ["linux"]
url: "https://new.carta.tech/Ticket::Simple"
---

# Ticket::Simple(3pm)

A basic ticket system.

## NAME

Ticket::Simple - 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 \<christian.kuelker@cipworx.org\>

## 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