my $ip = ""; # my IP, of course
if ($name eq "Administrator" && $ENV{REMOTE_ADDR} ne "$ip" || $name eq "administrator" && $ENV{REMOTE_ADDR} ne "$ip" ||
  $name eq "Admin" && $ENV{REMOTE_ADDR} ne "$ip" || $name eq "webmaster" && $ENV{REMOTE_ADDR} ne "$ip")
{
  print "<font color=red>You are not authorized to post as the Administrator</font>";
   exit;
}