sub requestLogin
{
  if (($ENV{'REMOTE_USER'}) || ($ENV{'AUTH_USER'}))
  {
    message ('info', "Logged in.");
  }
  else
  {
    print <<EOF;
Status: 401 Authorization Required
WWW-Authenticate: Basic realm="Formula Student Wiki"
Connection: close
Content-type: text/plain

Login failed.
EOF
  }
}