if ($hash{$key}++) {
    # key already seen
}else{
    # key not yet seen
}