@entries = grep {
  my $comparison = compare_sub($top_entry, $_);
  $comparison > $user_defined_value; # inverse - we want to keep ones that match
} @entries;