#!/usr/bin/perl # stupid gallery redirector so people don't have to type "script.cgi" # anymore. Now you can give people meaningful URL's like: # http://xxx.xxx.xxx/gallery/1 # # and they'll be redirected to # # http://xxx.xxx.xxx/gallery/script.cgi?page=1 $ROOTURL="http://www.houseness.org/gallery"; # ---------------------------------------------------------------------------- $q = $ENV{'SCRIPT_NAME'}; $q = (split("/",$q))[3]; print "Location: $ROOTURL/script.cgi?page=$q\n\n";