my %history;
....
# get a new value here and only add it if its not there.
$history{ $newvalue } = 1 unless exists $history{ $newvalue };
...