藤 吾郎 > WeakRef-Auto-0.02 > WeakRef::Auto

Download:
WeakRef-Auto-0.02.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.02   Source  

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 ^

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.

syntax highlighting: