#!/usr/bin/perl -w
use CGI qw(:standard);
require "../../../../common/header.pl";
$m = param("m");

$indexno = "03";

print "Content-Type: text/html; charset=ISO-8859-1\n\n";
print "<html>\n<head>\n<title>$text</title>\n";
print "<style type='text/css'><!--\n  \@import url(http://www.maproom.org/common/m.css);\n--></style>\n";
print "</HEAD>\n\n<BODY>\n$header\n";
$url = "http://www.maproom.org/00/$indexno/present.php?m=$m";
print "<P><center><h4>This page has moved to <a href='$url'>$url</a></h4></center>\n\n";
print "</BODY>\n</HTML>\n";
