The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Devel::Spy::TieScalar - Tied logging wrapper for scalars

SYNOPSIS

tie my $pretend_guts, 'Devel::Spy::TieScalar', \ $real_guts, $logging_function
  or croak;

# Passed operation through to $real_guts and tattled about the
# operation to $logging_function.
$pretend_guts = 42;

CAVEATS

Most functions have not been implemented. I implemented only the ones I needed. Feel free to add more and send me patches. I'll also grant you permission to upload into the Devel::Spy namespace if you're a clueful developer.

SEE ALSO

Devel::Spy, Devel::Spy::_obj, Devel::Spy::Util, Devel::Spy::TieHash, Devel::Spy::TieArray, Devel::Spy::TieHandle.