my $object = Acme->new;
my $copy = $object->clone;