can_ok $object, 'copy_for_xmission'; ok my $clone = $object->copy_for_xmission, '... and copying should be successful'; isa_ok $clone, 'Some::Class'; ok !defined $clone->ssn, '... but the SSN should not be copied';