Hi,
I need to remove duplicate entries from a file then print to a new output file. The following works, but how can i how print the non-duplicated hash to a file?
while (<>){ # take file with duplicate lines
chomp $_;
/(\d+)$/;
push @array, $1;
}
my %uniques;
foreach my $key(@array){
$uniques{$key}++;
}