NAME

Pots::SharedObject - Perl ObjectThreads base class for thread shared objects

SYNOPSIS

package My::Shared::Class;

use base qw(Pots::SharedObject);

sub new { my $class = shift;

    my $self = $class->SUPER::new();

    return $self;
}

DESCRIPTION

Pots::SharedObject is a base class for all Pots objects that need to be shared between threads.

METHODS

new ()

Standard method for creating a hash-based shared object. If you define your own "new()" method, don't forget to call "$class->SUPER::new()" before.

destroy ()

This method is called when the shared object is being destroyed, that is no other objects references it. It uses the standard Perl "DESTROY", so you should not use it in your derived classes. Redefine "destroy()" and put your cleanup code in it.

ACKNOWLEDGMENTS

The DESTROY "trick" for shared objects was stolen from Mike Pomraning. I found it in the "perl.ithreads" list: http://www.nntp.perl.org/group/perl.ithreads/766

AUTHOR and COPYRIGHT

Remy Chibois <rchibois at free.fr>

Copyright (c) 2004 Remy Chibois. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.