You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
Currently the Clone deep-walkers abort the search if any non-tied variable is found. This makes cases like the following fail:
Readonly::Hash my %rodata => (topkey => [ {x=>1}, {x=>2}, {x=>3} ]);
my @dataset = @{ $rodata{topkey} };
my $aref = Readonly::Clone @dataset; # stops prematurely
$aref->[0]->{x] = "newvalue"; # "attempt to modify read-only data"
The _ARRAY and _HASH subs start with return if !tied(@$arg) etc. and I'm wondering if this is necessary. If they were allowed to continue to recurse, they would find read-only items deeper down.
The text was updated successfully, but these errors were encountered:
Currently the Clone deep-walkers abort the search if any non-tied variable is found. This makes cases like the following fail:
The
_ARRAY
and_HASH
subs start withreturn if !tied(@$arg)
etc. and I'm wondering if this is necessary. If they were allowed to continue to recurse, they would find read-only items deeper down.The text was updated successfully, but these errors were encountered: