getting shared_clone() functionality with earlier threads::shared?

DrWhy has asked for the wisdom of the Perl Monks concerning the following question:

Greeting Monks,

I need to be able to do what threads::shared::shared_clone() does, namely do a deep copy of a data structure except that any portions that are shared are not cloned, but copied into the new structure, maintaining their sharedness with the old structure.

However, I need to do this with slightly older versions of threads::shared. We are working with version 1.14, but this function was added in version 1.21, I believe. It is not practical for us to upgrade at this time, and anyway, I'm considering putting this module up on CPAN and want to minimize the version-dependencies as much as possible.

Is there a solution to this problem that was avaible before the advent of threads::shared::shared_clone()?

--DrWhy

"If God had meant for us to think for ourselves he would have given us brains. Oh, wait..."

Comment on getting shared_clone() functionality with earlier threads::shared?

Replies are listed 'Best First'.
Re: getting shared_clone() functionality with earlier threads::shared? by BrowserUk (Patriarch) on Nov 10, 2010 at 01:14 UTC
Steal the code directly out of threads::shared.pm	[reply]
Re^2: getting shared_clone() functionality with earlier threads::shared? by DrWhy (Chaplain) on Nov 10, 2010 at 17:11 UTC
That's an interesting idea. I hadn't looked at the code for the more recent threads::shared and didn't realize shared_clone was implemented in pure perl -- I assumed it was in .xs like the rest of the module's code. Actually, I now think I can solve my problem better using Data::Alias. But I'll have to test to see if this aliasing plays well with shared variables. UPDATE: fixed typo. --DrWhy "If God had meant for us to think for ourselves he would have given us brains. Oh, wait..."	[reply]
Re^3: getting shared_clone() functionality with earlier threads::shared? by BrowserUk (Patriarch) on Nov 10, 2010 at 22:42 UTC
Actually, I now think I can solve my problem better using Data::Alias. But I'll have to test to see if this aliasing plays well with shared variables. That too is an interesting idea. It's not something I've ever thought to try. My gut feel says it's not going to work, but please be sure to come back and tell us how you get on. Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error. "Science is about questioning the status quo. Questioning authority". In the absence of evidence, opinion is indistinguishable from prejudice. RIP an inspiration; A true Folk's Guy	[reply]
Re^4: getting shared_clone() functionality with earlier threads::shared? by DrWhy (Chaplain) on Nov 17, 2010 at 15:49 UTC
Re: getting shared_clone() functionality with earlier threads::shared? by Anonymous Monk on Nov 10, 2010 at 01:17 UTC
http://search.cpan.org/src/JDHEDDEN/threads-shared-1.34/lib/threads/shared.pm Read more... (3 kB) It is not practical for us to upgrade at this time, Sure it is :) http://search.cpan.org/dist/threads-shared Its more practical than reinventing/debugging.... threads::shared	[reply] [d/l]


Perl Monk, Perl Meditation
	PerlMonks