Devel::Spy::TieArray - Tied logging wrapper for arrays

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

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

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.

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