Select Code to Download

@duplicates = grep $seen{$_}++, @temp;

# here we count how many times each duplicate appears
...

@unique_duplicates = keys %seen;

$record=Entry->new();
$record->id(1);
$record->duplicate(0);
$record->src("This is a duplicate.");

push @records, $record;