NAME

WeakRef::Auto - Automatically makes references weaken

VERSION

This document describes WeakRef::Auto version 0.02.

SYNOPSIS

            

              
              
use WeakRef::Auto;
autoweaken my $ref; # $ref is always weaken
$ref = \$var; # $ref is weak
sub MyNode::new{
        # ...
        autoweaken $self->{parent}; # parent is always weaken
        return $self;
}
            
          

DESCRIPTION

This module provides autoweaken(), which keeps references weaken.

FUNCTIONS

autoweaken($var)

Turns $var into auto-weaken variables, and keeps the values weak references. If $var already has a reference, it is weaken on the spot.

$var can be an element of hashes or arrays.

NOTES

• Because the prototype of autoweaken() is "\$" (i.e. autoweakn($var) actually means &autoweaken(\$var)), you'd better load this module in compile-time, using use WeakRef::Auto directive.

BUGS AND LIMITATIONS

autoweaken() does not work with tied variables, because autoweaken-ness is attached to the variable, not to the value referred by the variable, and tied variables interact with their objects by values, not variables, as the following shows:

            

              
              
my $impl = tie my %hash, 'Tie::StdHash';
autoweaken $hash{foo};
# $hash{foo} seems autoweaken. Really?
# Actually, $hash{foo} is linked to $impl->{foo} through FETCH()/STORE() methods,
# but there is no way to detect the relationship.
            
          

Patches are welcome.

DEPENDENCIES

Perl 5.8.1 or later.

SEE ALSO

Scalar::Util for a description of weak references.

AUTHOR

Goro Fuji <gfuji(at)cpan.org>.

LICENSE AND COPYRIGHT

Copyright (c) 2008, Goro Fuji <gfuji(at)cpan.org>. Some rights reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.