my @uniqIDs = grep{!$seen{$_}++}@IDs;