$copy = $entry->clone(reference_username => 1);
my $ref = sprintf('{REF:U@I:%s}', format_uuid($entry->uuid));
is $copy->username, $ref, 'Copy has username reference';
$copy = $entry->clone(reference_username => 1);
my $ref = sprintf('{REF:U@I:%s}', format_uuid($entry->uuid));
is $copy->username, $ref, 'Copy has username reference';