use vars '@keywords';

open(NULL,'/dev/null');
my $h = select(*NULL);

# This script leaves all its results in @keywords,
# and writes a flowery report that we ignore.
require 'other_script.pl';

select($h);
# and @keywords has all the stuff we want.