#!/usr/bin/perl
# james' simple redirect script.
$link = $ENV{'QUERY_STRING'};
$link =~ s/^link=//;
if ($link eq "") {
print "Location: http://www.apacheweek.com/\r\n\r\n"; exit(0);
} else {
print "Content-type: text/html\r\n\r\n";
print "Apache Week: The definitive online Apache resource\n";
print "\n\n";
}