Acme::MetaSyntactic::List - Base class for simple lists of names
package Acme::MetaSyntactic::beatles; use Acme::MetaSyntactic::List; our @ISA = ( Acme::MetaSyntactic::List ); __PACKAGE__->init(); 1; =head1 NAME Acme::MetaSyntactic::beatles - The fab four theme =head1 DESCRIPTION Ladies and gentlemen, I<The Beatles>. I<(hysteric cries)> =cut __DATA__ # names john paul george ringo
Acme::MetaSyntactic::List is the base class for all themes that are meant to return a random excerpt from a predefined list.
Acme::MetaSyntactic::List offers several methods, so that the subclasses are easy to write (see full example in SYNOPSIS):
The constructor of a single instance. An instance will not repeat items until the list is exhausted.
init() must be called when the subclass is loaded, so as to read the __DATA__ section and fully initialise it.
- name( $count )
Return $count names (default:
0will return the whole list in list context, and the size of the list in scalar context.
Return the theme name.
Philippe 'BooK' Bruhat,
Copyright 2005-2012 Philippe 'BooK' Bruhat, All Rights Reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.