Clone - recursively copy Perl datatypes - metacpan.org
recursively copy Perl datatypes