The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
FunctionalPerl-0.72
River stage zero No dependents
6 ++
/ Chj::Destructor

NAME

Chj::Destructor

SYNOPSIS

    use Chj::Destructor;

    my $z=0;
    {
       my $x= ["foo", Destructor { $z++ }];
    }
    is $z, 1;

DESCRIPTION

Util to help debug or test memory deallocation.

SEE ALSO

End.pm, but that one does not type-check the destructor argument early, nor does it localize error variables in its DESTROY method.