#!/usr/bin/perl binmode STDOUT; my $U = "proxyfaq.php"; if ($ENV{"QUERY_STRING"} ne "") {$U.="?".$ENV{"QUERY_STRING"};}; print "Status: 301 Moved Permanently\r\nLocation: $U\r\n\r\nThis page is movedThis page is moved here";