my $search_string = $cgi->param('search_string');
my @display_these =
    map { $_->[1] } # Strip off the ST
    sort { $a->[0] <=> $b->[0] } # Do the actual sort
    grep { $_->[0] > 0 } # Remove anything that scores a 0
    map { [ $_->score($search_string), $_ ] } # Create the modified ST
    @document_objects;