Script to Validate email format in siebel

PFB escript code to Validate email format in siebel

      var email = Inputs.GetProperty("EmailAddress");
     
      var pat = /(^[0-9a-z]([-_.]?[-_0-9a-z])*@[0-9a-z]([-.]?[0-9a-z])*\.[a-z]{2,4}$)/g;

    var valid = email.replace(pat,"Y");
   
    if(valid == "Y")
    {
      Outputs.SetProperty("StatusCode", 0);
      Outputs.SetProperty("sErrorType", "Email address format valid.");
}
else
{
      Outputs.SetProperty("StatusCode", 1);
      Outputs.SetProperty("sErrorType", "Please check the email address format.");
      }