#!/usr/bin/perl
#
# fixedredir.cgi

use strict;
use warning;



my$URL = "http://www.wives100.com/

print  "Status:   301 Moved\nLocation: $