Dancer::Object::SingleUser3Contributed Perl DocumeDancer::Object::Singleton(3)NAMEDancer::Object::Singleton - Singleton base class for Dancer
SYNOPSIS
package My::Dancer::Extension;
use strict;
use warnings;
use base 'Dancer::Object::Singleton';
__PACKAGE__->attributes( qw/name value this that/ );
sub init {
my ($class, $instance) = @_;
# our initialization code, if we need one
}
# .. later on ..
# returns the unique instance
my $singleton_intance = My::Dancer::Extension->instance();
DESCRIPTIONDancer::Object::Singleton is meantto be used instead of Dancer::Object,
if you want your object to be a singleton, that is, a class that has
only one instance in the application.
It provides you with attributes and an initializer.
METHODS
instance
Returns the instance of the singleton. The instance is created only
when needed. The creation will call the "init()" method, which you
should implement.
init
Exists but does nothing. This is so you won't have to write an
initializer if you don't want to. init receives the instance as
argument.
get_attributes
Get the attributes of the specific class.
attributes
Generates attributes for whatever object is extending Dancer::Object
and saves them in an internal hashref so they can be later fetched
using "get_attributes".
AUTHOR
Damien Krotkine
LICENSE AND COPYRIGHT
Copyright 2010 Damien Krotkine.
This program is free software; you can redistribute it and/or modify it
under the terms of either: the GNU General Public License as published
by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.
perl v5.14.1 2011-06-15 Dancer::Object::Singleton(3)