#!/usr/bin/perl use CGI; #use CGI ':standard'; #Mon Feb 11 09:43:10 MST 2008,dvm, redirect via perl ,replacing agora.cgi #print "Content-type: text/html\r\n"; $q = new CGI; print $q->redirect("http://www.yourdictionary.com/community/forums/",-status => 301); print "Refresh: 0; url=http://www.yourdictionary.com/community/forums/\r\n"; # for anyone else... print "Content-type: text/html\r\n"; print "\r\n"; print "new agora"; print "\r\n";