(jeffa) Re: Deepcopy of complex structures.

How about Clone?

UPDATE: some code

use strict;
use warnings;

use Clone qw(clone);
use Data::Dumper;

my $str;
$str .= "{ $_ => " for 'a'..'z';
$str .= '}' x 26;

my $orig = {
   nested_hash => eval $str,
   code_ref    => sub { my $foo = 'bar'; sub{$foo} },
};

my $clone = clone($orig);
print Dumper $clone->{nested_hash};

print $clone->{code_ref}->()->(), $/;
[download]

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)

Comment on (jeffa) Re: Deepcopy of complex structures. Download Code

Replies are listed 'Best First'.
Re: (jeffa) Re: Deepcopy of complex structures. by BrowserUk (Patriarch) on Jan 21, 2003 at 02:11 UTC
Unfortunately it uses XS. Despite nearly a week of trying, I have yet to succeed in building Perl myself, and PPM/PPM3 both stopped working (with no indication as to why) some time ago.:( If I could work out were AS keep the modules (as opposed to the PPD's) I might have a go at manual install... I've been successful with other modules from Dada's site amongst others, but googling didn't turn up the right stuff. I will have to hack my way through the PPM source to work out where PPM looks for the files:( Examine what is said, not who speaks. The 7th Rule of perl club is -- pearl clubs are easily damaged. Use a diamond club instead.	[reply]
Re: Re: (jeffa) Re: Deepcopy of complex structures. by iguanodon (Priest) on Jan 21, 2003 at 03:29 UTC
http://ppm.activestate.com/PPMPackages/zips/6xx-builds-only/Clone.zip seems to have the stuff to install on Windows... but no makefile. I think all PPM does is copy these files to the right place, so maybe you can download the zip file and do the same thing my (working) PPM 2 did: C:\>ppm PPM interactive shell (2.1.5) - type 'help' for available commands. PPM> install Clone Install package 'Clone?' (y/N): y Installing package 'Clone'... Bytes transferred: 5252 Installing D:\Perl\site\lib\auto\Clone\Clone.bs Installing D:\Perl\site\lib\auto\Clone\Clone.dll Installing D:\Perl\site\lib\auto\Clone\Clone.exp Installing D:\Perl\site\lib\auto\Clone\Clone.lib Installing D:\Perl\site\lib\Clone.pm Installing D:\Perl\site\lib\auto\Clone\autosplit.ix Writing D:\Perl\site\lib\auto\Clone\.packlist [download] Note: I've never actually tried this.	[reply] [d/l]
Re: Re: Re: (jeffa) Re: Deepcopy of complex structures. by grantm (Parson) on Jan 21, 2003 at 03:42 UTC
I'm pretty sure you're right - finding the zip file on ActiveState's site, downloading it, unpacking it and manually copying the files to \Perl\Site\lib will almost certainly work. However, dash2's suggestion to use Storable (first response) was a good answer and Storable is bundled with ActivePerl.	[reply]
Re: Re: (jeffa) Re: Deepcopy of complex structures. by castaway (Parson) on Jan 21, 2003 at 08:24 UTC
Finding out where the libs/files are is just a case of doing: perl -V isn't it? Or did I misunderstand something? (Have no space for AS perl on my Windows machines..) C.	[reply]


XP is just a number
	PerlMonks