IRC::Toolkit::TS6 - Generate TS6 IDs
use IRC::Toolkit::TS6; my $idgen = ts6_id(); my $nextid = $idgen->next;
Lightweight array-type objects that can produce sequential TS6 IDs.
The exported ts6_id function will instance a new ID object. ts6_id optionally takes a start-point as a string (defaults to 'AAAAAA' similar to
The object is overloaded in two ways; it stringifies to the current ID, and calling it as a
CODE ref is the same as calling "next":
my $idgen = ts6_id; my $current = "$idgen"; # 'AAAAAA' my $next = $idgen->(); # 'AAAAAB'
as_string method explicitly stringifies the current ID.
next will increment the current ID and return the ID as a string.
If no more IDs are available, next will croak.
Jon Portnoy <email@example.com>; conceptually derived from the relevant