Select Code to Download

# create object of My::Class
my $object = bless { some => 'thing' }, "My::Class";
...
# to bless the copy too, (and mind nested objects! -
# I ignored those here)
my $clone = bless { %$object }, "My::Package"