NAME

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

VERSION

version 0.07

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::Simple

• 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