The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

PurpleWiki::Sequence - Generates sequences for node IDs

SYNOPSIS

  use PurpleWiki::Sequence;

  my $dataDir = '/wikidb';
  my $url = 'http://purplewiki.blueoxen.net/cgi-bin/wiki.pl';

  my $sequence = new PurpleWiki::Sequence($dataDir);
  $sequence->getNext;

DESCRIPTION

Generates IDs in base 36 (10 digits + 26 uppercase alphabet) for use as node IDs.

METHODS

new($datadir)

Constructor. $datadir contains the Wiki configuration/database directory. There, PurpleWiki::Sequence stores the last used ID and an index of node IDs to fully qualified URLs (used by Transclusion.pm).

getNext($url)

Returns the next ID, increments and updates the last used ID appropriately. If $url is passed, also updates the NID to URL index.

AUTHORS

Chris Dent, <cdent@blueoxen.org>

Eugene Eric Kim, <eekim@blueoxen.org>

SEE ALSO

PurpleWiki::Parser::WikiText, PurpleWiki::Transclusion.