#!/usr/local/bin/perl

$location = "http://www.macobserver.com/wcgi-bin/redirects/wwdc.cgi";
$function = $ENV{QUERY_STRING};

print "Location: $location?$function\n\n";