I wanted to be able to tie the original variable while changing the original data.

I see. I remember that when I tried something similar to that with tied filehandles, I got Perl to segfault, so I'm not sure if tie is meant to be used that way.

It's not always possible to replace the monitored variable with a proxy, you just want to attach the magic directly.

That's probably true, but I imagine it wouldn't be too difficult to refactor the code in question from using a hash to a hashref?

Otherwise, if this is just for debugging, you could use refaliasing to replace the target hash with the tied hash? (though to unite you'd probably have to keep a reference to the original hash around)

use warnings;
use strict;
use feature 'refaliasing';
use Data::Dump;
use Tie::Subset::Hash;

my %hash;
@hash{"a".."e"} = 41..45;

dd \%hash;

tie my %hash2, 'Tie::Subset::Hash', \%hash, ['b'];
\%hash = \%hash2;

dd \%hash;

__END__

Aliasing via reference is experimental at foo.pl line 13.
{ a => 41, b => 42, c => 43, d => 44, e => 45 }
{
  # tied Tie::Subset::Hash
  b => 42,
}

[download]

In reply to Re^3: using TIEHASH as wrapper/proxy, while avoiding recursion and warnings by haukex
in thread using TIEHASH as wrapper/proxy, while avoiding recursion and warnings by LanX

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.