in reply to Difficulty with Object::InsideOut

Howdy!

Well...that's interesting.

I changed Set::Scalar::Valued to something else and it all worked fine. I tried two unrelated packages (CGI and Net::Server).

In the debugger, I find more "odd" behavior. I think I may need to examine Set::Scalar::Valued to see why, in:

# Flatten arg list my @arg_objs; while (my $arg = shift) { if (ref($arg) eq 'ARRAY') { push(@arg_objs, @{$arg}); } else { push(@arg_objs, $arg); } }
(being in Object::InsideOut::Foreign::inherit) that stepping into "while (my $arg = shift)" takes me directly to Set::Scalar::Base::size with the object that shift() would have consumed being passed in.

Ick. Examination of the entrails of Set::Scalar reveals nothing to me as yet. At this point, I'm puzzled more.

yours,
Michael