NAME

Tie::Scalar::Callback - a tied scalar which executes a callback everytime it is used

VERSION

version 0.062

SYNOPSIS

use Tie::Scalar::Callback;

# this coderef doubles the scalar's value everytime it's fetched
my $coderef = sub {
        state $value  = 1/2;
        state $factor = 2;
        $value *= $factor;
  }
};

tie(my $doubler, 'Tie::Scalar::Callback', $coderef);

print $doubler; 1
print $doubler; 2
print $doubler; 4

DESCRIPTION

Tie::Scalar::Callback is a class for creating tied scalars which execute a callback everytime an event occurs on the scalar. The callback's return value becomes the scalar's apparent value.

ACKNOWLEDGEMENTS

Thanks to brian d foy for coming up with the idea for this module.

SEE ALSO

• Tie::Cycle

• Tie::Scalar::Decay

• Tie::Scalar::Ratio

AUTHOR

David Farrell <dfarrell@cpan.org>

COPYRIGHT AND LICENSE

This software is Copyright (c) 2016 by David Farrell.

This is free software, licensed under:

The (two-clause) FreeBSD License