NAME

Devel::Spy::TieHandle - Tied logging wrapper for handles

SYNOPSIS

tie *FH, 'Devel::Spy::TieHandle', \ $fh, $logging_function
  or croak;

# Passed operation through to $fh and tattled about the
# operation to $logging_function.
print { *FH } 42;

CAVEATS

This has not been implemented. 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::TieScalar.