On Wed, 17 Dec 2003 09:32:41 -0800 "Chris Ochs" <[EMAIL PROTECTED]> wrote:
> I'm just trying to see how Apache::Singleton works. If my code is not > understandable, that's how far off I probably am from knowing how it works.. > That was why I asked if someone had a complete sample. A typical usage of Singleton is make a Configuration object accessable from all packages, without either making global variable or passing configuration in all methods. package My::Config; use base qw(Apache::Singleton); sub _new_instance { my $class = shift; # do initialization for config vars bless { ... }, $class; # should return blessed object } package main; my $config = My::Config->instance; That'd be a *complete* sample to work. -- Tatsuhiko Miyagawa -- Reporting bugs: http://perl.apache.org/bugs/ Mail list info: http://perl.apache.org/maillist/modperl.html