$mail = $_REQUEST["mail"];
  if("send" == $_REQUEST["action"])
  {
    $regs = Array();
//     if(ereg("^([a-zA-Z0-9][\-_a-zA-Z0-9].*)(\.[a-zA-Z0-9][\-_a-zA-Z0-9].*).*@([a-zA-Z0-9][\-_a-zA-Z0-9].*\.)+[a-zA-Z]{2,5}?$", $mail))
    if(!preg_match("/^([a-zA-Z0-9][\-_a-zA-Z0-9]*)(\.[a-zA-Z0-9][\-_a-zA-Z0-9]*)*@([a-zA-Z0-9][\-_a-zA-Z0-9]*\.)+[a-zA-Z]{2,5}?$/", $mail))
    {
      echo "O endereço de e-mail introduzido [$mail] aparenta ser inválido.
";
      echo "Se o problema persistir, por favor contacte [email protected]";
      $error = 1;
    }
    else
    {
     $headers = 'From: [email protected]' . "\r\n" . 'X-Mailer: PHP/' . phpversion();
      if (!mail("[email protected]", "Pedido de mailing list", $mail, $headers))
      {
        echo "Ocorreu um erro ao processar o seu pedido.
";
        echo "Por corrija-o e tente de novo.
";
        echo "Se acreditar ter recebido esta mensagem em erro, por favor contacte [email protected]";
        $error = 1;
      }
      else echo "Pedido registado. Obrigado!";
    }
  }
  if("send" != $_REQUEST["action"] || $error)
  {
    ?>
    
    
  }
?>