view release on metacpan or  search on metacpan

lib/Bot/ChatBots/Weak.pod  view on Meta::CPAN

   use Bot::ChatBots::Weak;
   my $object = Bot::ChatBots::Weak->new(
      what => $ref1,
      hey  => $ref2,
      look => 'not a reference',
   );
   $object->set(ahoy => $ref3);

   # it's a hash reference inside
   $object->{what}->frobozz; # called on $ref1 if still alive

   # TO_JSON always returns undef
   my $will_be_undef = $object->TO_JSON;


=head1 DESCRIPTION

This module provides a little wrapper class to keep things you want to be
as weak as possible.