藤 吾郎
and 1 contributors

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.