#!/usr/bin/perl -w
# TODO:
# Droplists show total of each writer/universe/title.
# Javascript to empty a droplist if another is selected.
##########################################################################
# Modules and globals.
##########################################################################
use CGI qw/:standard/;
use vars qw (%titles, %authors, %universes %universe_map
%author_map $directory $index);
$directory = "/work/ftp/pub/superguy/";
$index = $directory . 'Superguy.Index.complete.txt';
%universe_map = read_mappings($directory.'map-universes');
%author_map = read_mappings($directory.'map-authors');
%title_map = read_mappings($directory.'map-titles');
##########################################################################
# Reading the mappings
##########################################################################
sub read_mappings {
my ($fname) = @_;
my ($lastmatch, %map);
open (MAP, "< $fname") or die "Could not open mappings $fname: $!\n";
while (
The Autocollector selects the posts to output by performing the
appropriate sort of matching on the
complete index.
If your search didn't find a post you were expecting to find, you might
want to browse that file to find out what is wrong.
All material extracted by the Autocollector is copyright its respective
Authors. See the
Superguy FAQ
for details.
Jonathan Lennox
lennox\@cs.columbia.edu
April 3, 1996
END
print $query->end_html;