Clone - recursively copy Perl datatypes
| Use Case | Command | Description |
|---|---|---|
| đ Basic usage | use Clone 'clone'; | Import the clone function |
| đī¸ Clone a hashref | my $copy = clone($data); | Recursively copy a nested hash reference |
| đ Clone an arrayref | my $copy = clone(\@array); | Recursively copy a nested array reference |
| đ§Š Clone an object | my $copy = $obj->clone; | Clone via inheritance from Clone class |
| đĻ Clone a hash | my %copy = %{ clone(\%hash) }; | Clone a hash and dereference |
use Clone 'clone';
my $data = {
set => [ 1 .. 50 ],
foo => {
answer => 42,
object => SomeObject->new,
},
};
my $cloned_data = clone($data);
$cloned_data->{foo}{answer} = 1;
print $cloned_data->{foo}{answer}; # '1'
print $data->{foo}{answer}; # '42'
You can also add it to your class:
package Foo;
use parent 'Clone';
sub new { bless {}, shift }
package main;
my $obj = Foo->new;
my $copy = $obj->clone;
This module provides a clone() method which makes recursive copies of nested hash, array, scalar and reference types, including tied variables and objects.
clone() takes a scalar argument and duplicates it. To duplicate lists, arrays or hashes, pass them in by reference, e.g.
my $copy = clone (\@array);
# or
my %copy = %{ clone (\%hash) };
Storable's dclone() is a flexible solution for cloning variables, albeit slower for average-sized data structures. Simple and naive benchmarks show that Clone is faster for data structures with 3 or fewer levels, while dclone() can be faster for structures 4 or more levels deep.
Copyright 2001-2019 Ray Finch. All Rights Reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Ray Finch <rdf AT cpan.org>
Breno G. de Oliveira <garu AT cpan.org> and Florian Ragwitz <rafl AT debian.org> perform routine maintenance releases since 2012.
perl v5.34.0 2022-02-06 Clone(3pm)
Generated by phpman v4.9.26-5-g7740029 Author: Che Dong Under GNU General Public License
2026-08-16 09:07 @2600:1f28:365:80b0:7cb9:fb:26c1:e368
CrawledBy CCBot/2.0 (https://commoncrawl.org/faq/)