Searched refs:dclone (Results 1 – 17 of 17) sorted by relevance
25 use Storable qw(dclone);37 print "not " unless defined ($aref = dclone(\@a));60 print "not " unless defined($r = $foo->dclone);72 my $cloned = dclone(dclone($hash));88 my $clone = dclone($empty_string_obj);
24 use Storable qw(freeze thaw dclone);103 $a3 = dclone(\%a1);145 my $cloned = dclone(dclone($hash));
33 use Storable qw(dclone);43 $ref2 = dclone $ref;58 $ref2 = dclone $ref;
43 use Storable qw(retrieve store nstore freeze nfreeze thaw dclone);76 \&dclone, # XS function126 my $new_sub = dclone($obj[2]);
26 use Storable qw(freeze thaw dclone);81 use Storable qw(dclone);95 my $t = dclone($r->{sync});177 $x = dclone $real;
30 use Storable qw (dclone store retrieve freeze thaw nstore nfreeze);80 my $copy = eval {dclone $data};
42 Storable::dclone({foo => "bar"});
105 for my $cloner (\&dclone, \&freeze_thaw) {
332 return dclone $BLOCKS{$arg};397 return dclone $SCRIPTS{$arg};419 return dclone \%BLOCKS;437 return dclone \%SCRIPTS;721 return ref $CASESPEC{$code} ? dclone $CASESPEC{$code} : $CASESPEC{$code};
20 t/dclone.t See if Storable works
34 There is also a dclone() routine which performs an optimized mirroring
213 - dclone() now works with empty string scalar objects673 Added freeze/thaw interface and dclone.
6225 SV *dclone(pTHX_ SV *sv) in dclone() function6391 dclone(sv)6394 RETVAL = dclone(aTHX_ sv);
136 return Storable::dclone($obj);
2129 5.8 release of Perl), provides a function called C<dclone> that recursively2132 use Storable qw(dclone);2133 $r2 = dclone($r1);2136 It will be deeply copied. Because C<dclone> takes and returns references,2140 %newhash = %{ dclone(\%oldhash) };
859 lib/st-dclone........Unbalanced saves: 3 more saves than restores
824 ext/Storable/t/dclone.t See if Storable works